Önerilerimle ilgili araştırma yaptınız mı?
Tersine Çevir
o zaman split ve dizi başka yolu yok
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez. (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,
husem, proud to be a member of AccessTr.neT since 08-03-2009.
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)
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)
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Son Düzenleme: 18/01/2023, 00:25, Düzenleyen: Yandemir.
Konuyu Okuyanlar: 1 Ziyaretçi
