fb:porticula NoPaste
STR und MID
Uploader: | Sebastian |
Datum/Zeit: | 22.03.2013 16:37:21 |
Dim As Integer DLF
For DLF = 1 To 5
Print "Ohne MID: _" & STR(DLF) & "_ Mit MID: _" & MID(STR(DLF),1,1) & "_"
Next DLF
SLEEP
END
' Ausgabe des Programms:
'======================================
'Ohne MID: _1_ Mit MID: _1_
'Ohne MID: _2_ Mit MID: _2_
'Ohne MID: _3_ Mit MID: _3_
'Ohne MID: _4_ Mit MID: _4_
'Ohne MID: _5_ Mit MID: _5_