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

184 Okunma VBA

"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
String İlk Orta Son Karakter VBA

İlginizi Çekebilir

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

VBA 1'den N'e Kadar Olan Çift Sayıların Toplamını Bulma Örneği

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

VBA Bir Stringin Küçük Harfe Çevrilmesi

VBA Bir String İçinde Başka Bir Stringin Adetini Bulma Örneği