Programmieren - alles kontrollieren 4.941 Themen, 20.715 Beiträge

Keine Variable in der Mid-Funktion erlaubt?

BjoernB / 2 Antworten / Baumansicht Nickles

So funktioniert es:

Stringvariable = Mid(Textstring, 2, 1)


So funktioniert es nicht:

Stringvariable = Mid(Textstring, PosVar, 1)

Da ich mit einer For/Next-Schleife, ein komplettes Wort Position für Position durchgehen möchte, brauche ich die Positionsvariable (hier: PosVar). Wie ist sowas zu realisieren?

bei Antwort benachrichtigen
T-Rex BjoernB „Keine Variable in der Mid-Funktion erlaubt?“
Optionen

Klappt eigentlich hervorragend:

  Dim lngCount As Long
Dim strText As String

strText = "Da ich mit einer For/Next-Schleife, ein komplettes Wort Position für Position durchgehen möchte, " & _
  "brauche ich die Positionsvariable (hier: PosVar). Wie ist sowas zu realisieren"

For lngCount = 1 To Len(strText)
  Debug.Print Format(Asc(Mid(strText, lngCount, 1)), "000\ ");
Next lngCount



Gruß
Helge


PS: Fragen zu VB werden hier (www.activevb.de) schneller beantwortet.
 GrüßeT-Rex 
bei Antwort benachrichtigen
BjoernB T-Rex „Klappt eigentlich hervorragend: Dim lngCount As LongDim strText As String...“
Optionen

Vielen Dank!

bei Antwort benachrichtigen