Merhaba Arkadaşlar Bu Programımızda Bir Kelime Veya Cümle Yazıyorsunuz Ve Harf Seçiyorsunuz Program Kelime Veya Cümlede Kaç Tane Seçtiğiniz Kelimeden Var bunu Buluyor.
Dima AsIntegerDim karakter As Char
Dim cümle As String
cümle = InputBox("cümleyi giriniz")Dim sayac As Integer
sayac = 0
karakter = InputBox("karakteri giriniz")
For a = 0 To cümle.Length - 1
If cümle.Chars(a) = karakter Then
sayac = sayac + 1End If
NextMsgBox(" cümlenizde "& sayac & " tane "& karakter & " harfi var ")