VBA Bir Stringteki Küçük Harfleri Öne Alma Örneği

37 Okunma VBA

"VBA" Programlama dilinde "Bir Stringteki Küçük Harfleri Öne Alma Örneği" ile ilgili kod örneği aşağıda gösterilmiştir. 

Sub sort_string()
    Dim str1 As String
    Dim lower As New Collection
    Dim upper As New Collection
    Dim i As Integer
    Dim c As String
    
    str1 = "YazLiM"
    Debug.Print "Orjinal String: " & str1
    
    For i = 1 To Len(str1)
        c = Mid(str1, i, 1)
        If c Like "[a-z]" Then
            lower.Add c
        Else
            upper.Add c
        End If
    Next i
    
    Dim sorted_str As String
    For Each c In lower
        sorted_str = sorted_str & c
    Next c
    For Each c In upper
        sorted_str = sorted_str & c
    Next c
    
    Debug.Print "Sonuç: " & sorted_str
End Sub
String Lower Küçük Önce Karakter VBA

İlginizi Çekebilir

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

VBA Hesap Makinesini Açmak

VBA Dosya Varsa Oluşturmama

VBA Worksheet'leri Alfabetik Sıraya Sokmak

VBA Tüm Pivot Tabloları Refresh Etmek