Question

vb中，添加两个标签和两个文本框，在第一个文本框输入一个字符，回车键，对应的ascii在第二个文本框中

Answer 1

这也太简单了点吧？？？

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.Text = Asc(Text1.Text)
End If
End Sub

Answer 2

vb中，添加两个标签和两个文本框
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Text2.Text = Asc(Text1.Text)

End Sub