五笔打字通主页
VB程序题:编写一程序,在文本框中统计在该窗口上鼠标单击的次数,效果如下图所示。
提示:
对窗体编写两个事件:Form_load事件对文本框置初值为空;Form_Click事件对文本框计数。
对文本框计数:Text1=val(Text1)+1
解题:
先在窗体上画一个文本框,然后输入下面代码。
Private Sub Form_Click()
Text1 = Val(Text1) + 1
End Sub
Private Sub Form_Load()
Text1 = 0
End Sub
程序运行效果如下图所示。
Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码
来源:济亨网
本文链接:http://wb86.com/post/53.html