Gå til innhold

Anbefalte innlegg

Videoannonse
Annonse

Jeg er ikke akkurat noen mester i å skrive god og kort kode, men dette virker i alle fall:

 

		Dim i As Integer, str As String
	str = "streng med tekst"
	Dim chr(str.Length - 1) As Char

	Do Until i = str.Length
		chr(i) = str.Substring(i, 1)
		i = i + 1
	Loop

Lenke til kommentar
Jeg er ikke akkurat noen mester i å skrive god og kort kode, men dette virker i alle fall:

 

		Dim i As Integer, str As String
	str = "streng med tekst"
	Dim chr(str.Length - 1) As Char

	Do Until i = str.Length
		chr(i) = str.Substring(i, 1)
		i = i + 1
	Loop

 

 

Du har rett - funker kjempebra :-) Takktakk

Lenke til kommentar

Hvorfor engang gjøre det til en char array? Du kan fint hente ut tegn med indexeren.

 

Dim s As String = "Hello World!"
Dim c As Char = s(2)

eller

For Each c As Char In "Hello World!"
 Console.WriteLine(c & Environment.NewLine)
Next

Endret av GeirGrusom
Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...