Παρακάτω βλέπουμε την αντιστοιχία και την χρήση
VB 6 Εντολών σέ VB.NT
Len = .Length
Mid = .SubString
Replace = .Replace
InStr = .IndexOf
UCase = .ToUpper
LCase = .ToLower
Split = .Split
A) Παίρνοτας το μέγεθος ενός χαρακτήρα ή μιάς μεταβλητής
Textbox1.Text.Length
O παραπάνω κώδικας μάς επιστρέφει το μέγεθος του χαρακτήρα πού βρίσκεται στο Textbox1
Dim StrText As String
Dim r As Integer
StrText = "Θα πάμε εκδρομή στο Ναύπλιο?"
r = StrText.Length
MsgBox(r)
B) Παρακάτω βλέπουμε πώς εκτελείται η Mid function thw VB6 σέ .ΝΕΤ
Dim r As String = "Γειά σου κόσμε"
r = r.Substring(4)
MsgBox(r)
ή
Dim r As String = "Γειά σου κόσμε"
r = r.SubString(6, 3)
MsgBox(r)
Γ) Εκτέλεση της Instr σέ .NET κώδικα
Dim r As String = "Θα περάσουμε ένα υπέροχο Σαββατοκύριακο"
r = r.IndexOf("υπέροχο")
MsgBox(r)
Δ) Εκτέλεση της Replace σέ .ΝΕΤ
Dim i As String = "Ήμουν βλάκας που σέ πίστεψα"
i = i.Replace("βλάκας", "ηλίθιος")
MsgBox(i)
Ε) Δουλεύοντας της UCASE και LCASE της VB6 σε .ΝΕΤ
Dim r as String
r = "Θα έρθω να σε πάρω στις 8 το βράδυ"
r = r.ToUpper
TextBox1.Text = r
Dim r as String
r = "ΘΑ ΕΡΘΩ ΝΑ ΣΕ ΠΑΡΩ ΣΤΙΣ 8 ΤΟ ΒΡΑΔΥ"
r = r.ToLower
TextBox1.Text = r
ΣΤ) Δημιουργία arrays μέ την Split
Dim i As String = "κειμενο1;κειμενο2;κειμενο3;κειμενο4"
Dim a() As String
Dim j As Integer
a = i.Split(";")
For j = 0 To a.GetUpperBound(0)
MsgBox(a(j))
Next