Question

VB.NET 从Textbox1输入的字符怎么能当变量用？

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Step1 = TextBox1.Text
Step2 = (Asc(Step1)) -----这里会提示字符必须大于0
Me.TextBox2.Text = Step2
End Sub
我想实现的是 从TextBox1输入字符（串），从Textbox2 输出ASCII码，但是每次输入变量就会提示字符长度必须大于0。

Answer 1

 Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Step1 = TextBox1.Text
if trim(Step1)="" then exit sub  '加这句判断为空就退出sub
 Step2 = (Asc(Step1))  -----这里会提示字符必须大于0
 Me.TextBox2.Text = Step2
End Sub

追问

我的意思是 输入一个字符后，会提示字符必须大于0。Asc函数没有把我的输入 做asc处理。

追答

Setp1，Step2声明一下。奇怪，vs2013测试，不加我那一句，碰到为空时直接退出了程序，而不是报错，加完我那一句后一切正常，textbox2中输出textbox1中字符串第一个字符的ascii码

Answer 2

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
Dim step1, step2 As String
If Trim(TextBox1.Text) <> "" Then
step1 = TextBox1.Text
step2 = (Asc(step1))
Me.TextBox2.Text = step2
Else
MsgBox("字符必须大于0!")
End If

End Sub