1. [基本操作题]在窗体上添加一个定时器、标签和命令按钮,先将按钮的标题设置为“Stop”。程序运行后自动启动定时器,每隔一秒显示当前的时间到标签;如果单击按钮,则停止时间(定时器暂停),按纽的标题变为“Start”;如果再次单击,则开始显示时间(定时器启动),按纽的标题变为“Stop”。运行后的窗体如图所示。编写代码实现这个要求。保存的窗体名称为sy2-2.frm。工程文件名为sy2-2.vbp
急求vb答案
答案:1 悬赏:40 手机版
解决时间 2021-04-28 03:24
- 提问者网友:容嬷嬷拿针来
- 2021-04-27 09:05
最佳答案
- 五星知识达人网友:雪起风沙痕
- 2021-04-27 10:12
又是你哦,呵呵
Private Sub Command1_Click()
Static a As Integer
a = a + 1
If a = 1 Then Command1.Caption = "start": Timer1.Enabled = False
If a = 2 Then Command1.Caption = "stop": Timer1.Enabled = True: a = 0
End Sub
Private Sub Form_Load()
Label1.Caption = Time
Timer1.Interval = 1000
Command1.Caption = "stop"
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Time
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯