VBA Stringin Tersten Okunuşu İle Aynı Olduğunu Kontrol Eden Örnek

202 Okunma VBA

"VBA" Programlama dilinde "Bir Stringin Tersten Okunuşu İle Aynı Olduğunu Kontrol Eden Örnek" ile ilgili örnek kod aşağıda belirtilmiştir. 

Sub Main()
    Dim a As String
    Dim b As String
    b = ""
    a = InputBox("String Değeri Girin:")
    Dim n As Integer
    n = Len(a)
    For i = n - 1 To 0 Step -1
        b = b & Mid(a, i + 1, 1)
    Next

    If StrComp(a, b, vbTextCompare) = 0 Then
        MsgBox "Tersten okunuşu ile aynıdır."
    Else
        MsgBox "Tersten okunuşu ile aynı değildir."
    End If
End Sub
Ters String Değer Oku Aynı VBA

İlginizi Çekebilir

VBA While Döngüsü İle 10 Sayının Ortalamasını Bulma Örneği

VBA Dosyanın Güncelleme Tarihini Değiştirme

VBA Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

VBA Bir Stringdeki Noktalama İşaretlerini Kaldırma Örneği

VBA Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği