Ayni kodlari C# için yazdiktan sonra birde VB.NET için yazalim... Basliktanda anlasilacagi gibi ilk string degeri büyük geri kalanini küçük harfe cevirip bize geri gönderen metodumuzu yazacagiz... Bu metodu genelliklte kullanici kayit islemlerinde veritabanina bilgilerin düzenli bir sekilde kaydedilmesi için kullanilabilir veya farkli islevlerdede kullanilabilir, bu programciya kalmis... Gereken kodlari asagida belirtiyorum...

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ilk_harf_büyük.Click
Dim len, lef As Integer ' "len" isimli integer tip degisken tanimliyor...
len = TextBox1.Text.Length 
'..textBox1 'in uzunluguna atiyorum
lef = TextBox2.Text.Length 
'..textBox2 'in uzunluguna atiyorum
Dim a, b As String ' string olarak "a" degiskeni tanimliyorum
a = TextBox1.Text.Substring(0, 1) 
' substring ile "a" degiskenimi ilk karakter için ayarliyorum
b = TextBox2.Text.Substring(0, 1) 
' substring ile "b" degiskenimi ilk karakter için ayarliyorum
' ilk karakterim olan"a"degiskenimi " büyük ,digerlerini küçük yaptiriyorum ve label'a aktariyorum
ListBox1.Items.Add(a.ToUpper() & TextBox1.Text.Substring(1, len - 1).ToLower() & " " & (b.ToUpper() & TextBox2.Text.Substring(1, lef - 1).ToLower()))
Label3.Text = (a.ToUpper() & TextBox1.Text.Substring(1, len - 1).ToLower() & " " & (b.ToUpper() & TextBox2.Text.Substring(1, lef - 1).ToLower()))
End Sub
End
Class

Örnek çalismayi buradan indirebilirsiniz.