欢迎访问服务器技术网-www.fuwuqijishu.com

vb中的一个小问题

程序设计 fuwuqijishu 2年前 (2022-10-01) 9次浏览 0个评论 扫描二维码

关于我的目的是先隐藏label1,等用户按回车以后再显示label1,label1的caption属性为用户的输入,我的程序代码如下:
Dim m As String
Private Sub Form_Load()
Label1.Visible = False
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
a = Chr(KeyAscii)
m = m & a
Label1.Visible = True
Label1.Caption = m
End Sub
这样的代码到底哪里不对了呢?想了好久都想不出来我到底错在哪里,请高手指点一下,小的必定感激涕零!还请写出正确的程序代码,谢谢!

的问题

最主要的问题,Form_KeyPress里你没判断当前输入的是不是回车就无条件把Label1设为可见了,所以无论用户输入了什么,都能使Label1可见。
把Label1.Visible = True前面加上判断,改为
If KeyAscii = 13 Then Label1.Visible = True

喜欢 (0)
发表我的评论
取消评论
表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址

Warning: error_log(/www/wwwroot/fuwiqijishu/wp-content/plugins/spider-analyser/#log/log-2510.txt): failed to open stream: No such file or directory in /www/wwwroot/fuwiqijishu/wp-content/plugins/spider-analyser/spider.class.php on line 2900