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

"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



İlginizi Çekebilir

VBA Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Örne ...

VBA Bir Stringin Büyük Harfe Çevrilmesi

VBA 1'den 100'e Kadar Asal Sayı Toplam Örneği

VBA Bir Sayının Tek Mi Çift Mi Olduğunu Göstermek

VBA Şifrelenmis Worksheet'lerin Şifresini Kaldırmak