Vb.net Visual Studio按钮事件
我想编码一个按钮,点击3次后,链接到我的网站的用户。前两个应该在文本框中生成代码,最后一个应该链接它们。这就是我目前所拥有的Vb.net Visual Studio按钮事件,vb.net,Vb.net,我想编码一个按钮,点击3次后,链接到我的网站的用户。前两个应该在文本框中生成代码,最后一个应该链接它们。这就是我目前所拥有的 Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick ProgressBar1.Increment(3) If ProgressBar1.Value = 100 Then TextBox1.Text = "Thank you"
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(3)
If ProgressBar1.Value = 100 Then
TextBox1.Text = "Thank you"
Timer1.Stop()
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If RadioButton1.Checked = True Then
Timer1.Start()
ElseIf RadioButton2.checked = True Then
Timer1.Start()
Else
TextBox1.Text = "Please Select Option"
End If
End Sub
我不知道ProgressBar和Timer有什么用。但若你们想知道用户点击一个按钮的次数,一个计数器变量就可以了
Private _clickCounter As Integer
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
_clickCounter += 1
If _clickCounter = 3 Then
MsgBox("3 times")
_clickCounter = 0
'link to your site
Else
'generate code in textbox
End If
End Sub
使用一个整数,该整数在每次单击按钮时递增,并使用
Select Case
语句检测该整数
Dim NumberOfClicks As Integer = 0
Dim webAddress As String = "http://www.YourWebsite.com/"
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
number = number + 1
Select Case number
Case 1
''''' Code for your textbox
Case 2
''''' Code for your textbox
Case 3
Process.Start(webAddress)
End Sub
这应该可以。如果有帮助,请将我的答案标记为已解决。我发现人们会无缘无故地否决这篇文章。谢谢你的评论,我假设我可以用打开网页的命令替换关于消息框显示的部分?是的,你可以替换你想要的任何操作