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
merhaba, kolay gelsin arkardaşlar,
tersine çevir butonuna basınca, 1.metin kutusunda olan veriyi tersine çevirmek istiyorum,
yardımcı olabilir misiniz,

aşağıdaki gibi,
[img][Resim: do.php?img=15108][/img]
Split() fonksiyonu ile metni diziye aktarıp dizi elemanlarını tersten birleştirerek yapabilirsiniz
nasıl yapacağımı bilmiyorum,
yardımcı olabilirsen sevinirim,

iyi çalışmalar,
2 konuda araştırma yapmanız işinize yarayabilir
1 - Split fonksiyonu
2 - dizi elemanlarını alma
Dim myString As String
    myString = "This is my test string"
    MsgBox myString
   
    myString = StrReverse(myString)
    MsgBox myString
(17/01/2023, 23:20)Yandemir yazdı: [ -> ]Dim myString As String
    myString = "This is my test string"
    MsgBox myString
   
    myString = StrReverse(myString)
    MsgBox myString

merhaba,
bu kodu denemiştim,


örnekteki 15-16-17 gibi rakamları çevirirken 71-61-51 diye çeviriyor, mantıken doğru, ama ben tersine yaparken aslında
8-9-10-11-12-13-14-15'i
15-14-13-12-11-10-9-8'gibi yapmak istiyorum,

o yüzden bu kod işime yaramadı,
ilgilendiğiniz için teşekkür ederim,
Sayfalar: 1 2