s k 0 r
Also mein Problem, ich will jedes Zeichen in einem String ansprechen, um sie dann zu verwenden. Aber irgendwie will es nicht klappen, habe es so probiert, klappt aber nicht:
| code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
|
On error resume next
dim Zeichenkette as string
Zeichenkette = "hallo"
for i = 1 to len(Zeichenkette)
blablaa = asc(i)
next
|
|
er gibt aber nur den ascii code des ersten zeichen aus, aber ich will ja alle...
Hoffe, es kann mir einer helfen
MfG: sk0r
Wolf
Das steht in der vb-hilfe, dass asc immer nur das erste Zeichen erfasst. In den klammern steht der String. asc(i) gibt also den code von i aus. Du musst also erst den Buchstaben aus deinem String ausschneiden (Mid-Funktion).
| code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
|
Sub test()
Dim Zeichenkette As String
Dim buchstabe As String
Zeichenkette = "hallo"
For i = 1 To Len(Zeichenkette) - 1
buchstabe = Mid(Zeichenkette, i, 1)
blablaa = Asc(buchstabe)
MsgBox (blablaa)
Next
End Sub
|
|
s k 0 r
argh ich wustse doch das da irgendwas mit der mid() funktion war
danke danke !!!