vb中,如何连续单击按钮,然后连续在Text中连续出现我要的东西?
vb中,如何连续单击按钮,然后连续在Text中连续出现我要的东西?,比如说,单击按钮1后,在Text中出现一个”1“,然后再单击一下,又出现一个“1”...
vb中,如何连续单击按钮,然后连续在Text中连续出现我要的东西?,比如说,单击按钮1后,在Text中出现一个”1“,然后再单击一下,又出现一个“1”
展开
3个回答
展开全部
动态。。忘了
Private Sub Command1_Click()
Static i As Long
i = i + 1
Select Case i
Case 1
Text1.Text = "输入你想要的内容"
Case 2
Text1.Text = "输入你想要的内容"
'........要多少自己补全
Case n
Text1.Text = "输入你想要的内容" 'n为最后你想要的次数,视实际情况代入实际值
i = 0 '这一步是循环的关键
End Select
End Sub
Private Sub Command1_Click()
Static i As Long
i = i + 1
Select Case i
Case 1
Text1.Text = "输入你想要的内容"
Case 2
Text1.Text = "输入你想要的内容"
'........要多少自己补全
Case n
Text1.Text = "输入你想要的内容" 'n为最后你想要的次数,视实际情况代入实际值
i = 0 '这一步是循环的关键
End Select
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询