VBA Bir Stringin Ortadaki Üç Karakterini Bulma Örneği

197 Okunma VBA

"VBA" Programlama dilinde "Bir Stringin Ortadaki Üç Karakterini Bulma Örneği" ile ilgili örnek kod aşağıda verilmiştir. 

Sub GetMiddleThreeChars(ByVal str1 As String)
    Debug.Print "Orjinal String: " & str1
    
    Dim mi As Integer
    mi = Len(str1) / 2
    
    Dim res As String
    res = Mid(str1, mi, 3)
    
    Debug.Print "Ortadaki Üç Karakter: " & res
End Sub

Sub Test()
    Call GetMiddleThreeChars("Yazilim")
    Call GetMiddleThreeChars("Yazilimi Çok Seviyorum")
End Sub
String Orta Karakter Üç Char VBA

İlginizi Çekebilir

VBA Bir Stringin İlk Orta ve Son Karakterini Alma Örneği

VBA Dictionary Key Value Değerlerini Ters Çevirmek

VBA Bir Listede Birden Çok Olan Elemanları Göstermek

VBA Bir Sayının Asal Sayı Olup Olmadığını Bulma Örneği

VBA Dikdörtgenin Alanını Hesaplama Örneği