|
|
|
|
|
|
|||||||
| Programmierung Rat & Tat für Programmierer |
|
|
Themen-Optionen | Ansicht |
26.04.2002, 14:09
|
#6 |
|
Schwarzfußfrettchen
 Registriert seit: 28.01.2001
Beiträge: 2.071
|
public function zweistellig(wert as long) as string
dim dummy as string dummy=cstr(wert) if len(dummy)<2 then dummy="0" & dummy:else dummy=right$(dummy,2) zweistellig = dummy end function aufrufen mit.. MSComm1.Output = zweistellig(VScroll1.Value) & Text4.Text 
____________________________________
Wann die kan Almdudler ham... \"Es gibt nur einen Weg zur Lunge, und der muss geteert werden, damit der Krebs nicht stolpert!\" http://www.dream.at/gizmo/bunny.gif Image is © 2001 Merle Sterndalsäg.. ähh... jäger 
|
|
|
| Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1) | |
|
|
Baum-Darstellung