VB.NET使用If命令在单击时移动按钮

时间:2014-11-29 17:23:04

标签: vb.net

我正在制作这个愚蠢的小游戏,当你点击它时按钮会离开你。所以当我第一次点击它时它让它移动但它不会再移动。

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
    ProgressBar1.Increment(+1)
    Label2.Text = ProgressBar1.Value
    Button5.Location = New Point(424, 12)
    If Button5.Location = New Point(424, 12) Then Button3.Location = New Point(219, 80)
    If Button5.Location = New Point(219, 80) Then Button5.Location = New Point(12, 80)

在第二个按钮上如果按钮不再移动。我找不到任何其他线程。有什么帮助吗?

1 个答案:

答案 0 :(得分:0)

  1. 在第一个if语句中将button3更改为button5。
  2. 删除语句Button5.Location = New Point(424, 12)
  3. 将第一个if语句更改为elseif
  4. 添加elseif语句,从12,80到424,12