我要做一個程式是輸入一段資料,將它的次序倒過來輸來
例:12345 輸出變成54321
我做了一個表單,各兩個label, textbox ,Command
textbox就是輸入資料和輸出資料,Command1是\"輸出\"點一下倒過來的資料就會出現在text2,我該如何做呢???
2006-03-21 09:56:28 · 2 個解答 · 發問者 Anonymous in 電腦與網際網路 ➔ 程式設計
Private Sub Command1_Click()Text2.Text = StrReverse(Text1.Text)End SubStrReverse函數:傳回一個字串,其中一個指定子字串的字元順序是反向的。
2006-03-21 10:21:40 · answer #1 · answered by W.J.S. 7 · 0⤊ 0⤋
提供一個不使用strReverse的方法
Text2=""
For i = Len(Text1) To 1 Step -1
Text2 = Text2 & Mid(Text1, i, 1)
Next
2006-03-21 12:17:54 · answer #2 · answered by Jack 4 · 0⤊ 0⤋