lägga över tecken till en array!

[svårtförprogrammering]

Jag lägger in personnummer från en textruta till en variabel "strmellanläge".

Sedan vill jag plocka över varje tecken (ett och ett) från personnumret till en array "strTecken(iDx)". Och det är här jag stöter på problem jag får inte in tecknet (första numret) i arrayen! Är det någon som vet hur man gör?

Tacksam för svar

 

 

strMellanläge = txtPersonnummer.Text

iDx = 1

 

Dim strTecken(11) As String

 

For iDx = 1 To 11

 

strNummer = Microsoft.VisualBasic.Mid(strMellanläge, iDx, 1)

strTecken(iDx) = strNummer

 

iDx = iDx + 1

Next

 

[Anjuna Moon]

Varför använder du en massa gamla VB6-funktioner när du sitter med .Net?

 

Här är ett sätt att göra det på:

 Dim sPNO As String = "700703-xxxx"
       Dim arrPNO() As Char
       arrPNO = sPNO.ToCharArray()