[VB.NET]
Ich will von einer Zeichenkette einige Characters auslesen
ich habe auf der MSDN seite das gefunden
PHP-Code:
Option Explicit On
Option Strict On
Imports System
Imports System.IO
Public Class CharsFromStr
Public Shared Sub Main()
' Create a string to read characters from.
Dim str As [String] = "Some number of characters"
' Size the array to hold all the characters of the string
' so that they are all accessible.
Dim b(24) As Char
' Create an instance of StringReader and attach it to the string.
Dim sr As New StringReader(str)
' Read 13 characters from the array that holds the string, starting
' from the first array member.
sr.Read(b, 0, 13)
' Display the output.
Console.WriteLine(b)
' Close the StringReader.
sr.Close()
End Sub
End Class
nur gibt er mir nichts aus
deswegen hab ich das erstma auf einen bUTTon gebracht um dat erstmal auszuführen.dann wollte ich das er dat ganze in ner messagebox ausgibt.
also man wandelt das sr.Read von einen Integer in einer String um. und dann
dat ausgeben zu lassen.
rausgekommmen ist das :
PHP-Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' Kreiert String zum lesen von Charactern
Dim str As [String] = "Some number of characters"
' Passt den Array an um alle Character aufzunehmen
' dass man alle verwenden kann
Dim b(24) As Char
' Kreiert eine Instanz von Stringreader und fügt ihn an den string an
Dim sr As New StringReader(str)
' Liest 13 Character vom String wo der Array hält
' Vom ersten Array Member an
sr.Read(b, 0, 13)
Dim TEST As String = sr.Read REM speichert sr.Read in der Variable TEST als String
Dim DISPLAY As String = TEST REM damit man es in der Message box ausgeben kann
' Zeigt Output an
MessageBox.Show(DISPLAY) REM startet messagebox
' Schliesst StringReader
sr.Close()
End Sub
nu gibt er aber 102 aus. ich gehe mal davon aaus das mein prob bei der umwandlung von integer in string liegt. wie kann ich das anders machen aber mir trotzdem das in einer Messagenbox ausgegeben wird.??
es wird für ein größeres proggi gebraucht. und dafür brauche ich strings.
MFG Max
EDIT Mit Option Strict Off
Na klar geht das, wie sollst du denn sonst dein Programm erstellen?
