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

"VBA" Programlama dilinde "Bir Stringin İlk Orta ve Son Karakterini Alma Örneği" ile ilgili kod örneği aşağıdadır.

Sub Main()
    Dim str1 As String
    Dim res As String
    Dim l As Integer
    Dim mi As Integer
    
    str1 = "Yazilim"
    Debug.Print "Orjinal String: " & str1
    
    res = Mid(str1, 1, 1)
    l = Len(str1)
    
    mi = l \ 2

    res = res & Mid(str1, mi + 1, 1)
    res = res & Right(str1, 1)
    
    Debug.Print "Yeni String: " & res
End Sub



İlginizi Çekebilir

VBA Yarıçap Girilen Bir Dairenin Çevre ve Alanını Bulma Örneği

VBA Dictionary Key Value Değerlerini Ters Çevirmek

VBA Dosyaları Uzantıya Göre Arama

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

VBA 1'den N'e Kadar Asal Sayıları Bulma Örneği