作者catchtest (蕭雲)
看板Visual_Basic
標題Re: [.NET] vb2005的問題?
時間Fri Dec 5 17:11:58 2008
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim txt As New System.Text.StringBuilder
For i As Integer = 0 To TextBox1.Text.Length - 1
txt.Append(Hex(Asc(TextBox1.Text(i))).ToString)
Next
TextBox1.Text = txt.ToString
End Sub
※ 引述《lineage90160 ()》之銘言:
: 我想把輸入的字元轉換成ascii碼(7->55 A->65 B->66)
: EX:7AB 轉成 556566
: 然後用另外一個for迴圈每兩個抓一組換成16進位
: EX:55->37 65->41 ......
: 以下是我寫的 但是跑的結果例外
: [從字串 "" 至型別 'Long' 的轉換是無效的。]
: Private Sub butTran_Click(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles butTran.Click
: Dim a As Integer
: For i As Integer = 1 To Len(txtKr.Text)
: a = Asc(Mid(txtKr.Text, i, i))
: Next i
: For j As Integer = 1 To Len(a) Step 2
: txtKu.Text &= Hex(Mid(a, j, j + 2))
: Next
: End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.59.68.3
→ lineage90160:謝嚕 12/05 19:24
→ fumizuki:要習慣呼叫函式要加括弧→ txt.ToString() 12/05 19:49