Re: [VB6 ] 字串轉換的問題

看板Visual_Basic作者 (lisder)時間13年前 (2012/04/18 14:37), 編輯推噓2(2推 0噓 16→)
留言18則, 6人參與, 最新討論串3/3 (看更多)
※ 引述《lisder (lisder)》之銘言： : 我想要在Text裡面輸入字串，在將這些字串轉為ASCII : 於是將程式寫為 Label1.Caption = Asc(Text1.Text) : 可由Label所呈現的結果裡，只有第一個字元有成功轉為ASCII : 後面的字元都沒有轉換到。 : 我該怎麼要修改我的程式呢？懇請各位大大幫忙～ 我有試過for與mid()的方式了，但還是沒有抓到我想要的東西 目前暫時以不轉換ASCII，先成功抓到為主，我的程式碼如下： Dim ss As String Private Sub Command1_Click() For I = 1 To Len(Text1.Text) ss = Mid("Text1.Text", I, 1) Next I Label1.Caption = ss End sub 請問這段程式碼哪裡錯了呢？點下command1後，label1的顯示馬上消失不見 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 120.117.112.36
推
04/18 15:00, , 1F
你其實已經抓到了 只是你自己把前面的結果蓋掉了而已
04/18 15:00, 1F
推
04/18 15:05, , 2F
ss一直被覆蓋，label1不是最後只會呈現最後一碼嗎?
04/18 15:05, 2F
→
04/18 15:07, , 3F
for i=1 to len(trim(Text.text)) ss=ss+mid(...) next
04/18 15:07, 3F
→
04/18 15:08, , 4F
抱歉打錯了 是Text1.text
04/18 15:08, 4F
→
04/18 15:12, , 5F
恩…感謝L大與s大的幫忙，現在真的有抓到了，可要如何將抓
04/18 15:12, 5F
→
04/18 15:13, , 6F
到的字元轉成ASCII呢？我試過asc的方式～但是他只轉第一個
04/18 15:13, 6F
→
04/18 15:13, , 7F
字元
04/18 15:13, 7F
→
04/18 15:43, , 8F
asc(ss)不就是了。
04/18 15:43, 8F
→
04/18 15:45, , 9F
的確是asc(ss)，可這樣只有第一個字元，如果我輸入一個以上
04/18 15:45, 9F
→
04/18 15:45, , 10F
你學過 i = i + 1 吧？那你知道 s = s & "1" 的用途吧？
04/18 15:45, 10F
→
04/18 15:46, , 11F
s="" : for i=1 to 10 : s = s & str(i) : next i
04/18 15:46, 11F
→
04/18 15:46, , 12F
以上的字元，後面都不會被轉換到。
04/18 15:46, 12F
→
04/18 15:46, , 13F
請問 s 最後是什麼？
04/18 15:46, 13F
→
04/18 15:55, , 14F
1 2 3 4 5 6 7 8 9 10
04/18 15:55, 14F
→
04/18 15:56, , 15F
那你還有什麼問題。
04/18 15:56, 15F
→
04/18 15:58, , 16F
謝謝你的指點，我會在嘗試看看
04/18 15:58, 16F
→
04/18 21:34, , 17F
Text1.Text 為何前後要加雙引號
04/18 21:34, 17F
→
04/18 21:50, , 18F
XD 囧了
04/18 21:50, 18F
‣ 更多 lisder 的文章
文章代碼(AID): #1FZc4T1r (Visual_Basic)
‣ 更多 lisder 的文章
文章代碼(AID): #1FZc4T1r (Visual_Basic)