扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
把ByVal e as System.EventArgs改为ByVal e As System.Windows.Forms.KeyPressEventArgs即可
网站建设哪家好，找创新互联建站！专注于网页设计、网站建设、微信开发、小程序开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了扎囊免费建站欢迎大家使用！
Private Sub TextBox2_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If Asc(e.KeyChar) = 13 Then
If Not IsNumeric(TextBox2.Text) Then
TextBox2.Text = ""
TextBox2.Focus()
End If
End If
End Sub
如果不懂，可以追问
望采纳
unicode的回车和换行符
13和10就是它们的ascii码
相当于程序里的vbCrLf
t.Text = (t.Text strTemp vbCrLf)
选“A",因为asc函数是把里面的参数转换为ACS码（A的asc码为65），然后再把右边的数值付给左侧的x变量。所以x等于65。。。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网