Кнопка бегает по окну и надо на нее нажать, ошибка в коде - VB

Формулировка задачи:

Начал изучать программирование с VB 6.0 Столкнулся с задачкой (мини игра) кнопка бегает по окну и надо на нее нажать. Код забил проверил раз 10 вроде все правильно но выдает ошибку, скажите плиз в чем ошибка и что надо исправить заранее спасибо)
Private Sub Command1_Click()   'В этом месте компилятор ругается
Command1.Enabled = False
Command1.Caption = "Готово!!"
Timer1.Enabled = False
 
End Sub
 
Private Sub Command3_Click()
End
End Sub
 
Private Sub Form_Load()
Randomize Timer
End Sub
 
Private Sub Timer1_Timer() и в этом
i = Int(9 * Rnd)
Command1.Visible = True
Command1.Top = 200 + 600 * (i \ 3)
Command1.Left = 200 + 900 * (i Mod 3)
 
End Sub

Код к задаче: «Кнопка бегает по окну и надо на нее нажать, ошибка в коде - VB»

textual
Private Sub Command1_Click(Index As Integer)
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

14   голосов, оценка 4.071 из 5


СДЕЛАЙТЕ РЕПОСТ