AccessTr.neT

Tam Versiyon: Tersine Çevir
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Önerilerimle ilgili araştırma yaptınız mı?
o zaman split ve dizi başka yolu yok
(17/01/2023, 23:48)berduş yazdı: [ -> ]Önerilerimle ilgili araştırma yaptınız mı?

split ile ilgili örnek birşeyler bulamadım,
olmazsa da başka bir çözüm bulacağım, gerekirse el ile yazarım,

ilgilendiğiniz için teşekkür ederim,
Dim myString As String
    Dim myStringSonuc As String
    Dim Dizim() As String
   
    myString = "1-2-3-4-5-6-7-8-9-10-11-12-13-14-15"
    Dizim() = Split(myString, "-")
   
    For i = UBound(Dizim) To LBound(Dizim) Step -1
        myStringSonuc = myStringSonuc & Dizim(i) & "-"
    Next i
   
    MsgBox Mid(myStringSonuc, len(myStringSonuc)-1)
teşekkür ederim, kolay gelsin,
uygulamadım, çalışıyor,
Sayfalar: 1 2