编VB程序时出现变量未定义怎么修改
OptionExplicitPrivateSubcommand1_click()Timer1.Enabled=TrueTimer2.Interval=10EndSubPr...
Option Explicit
Private Sub command1_click()
Timer1.Enabled = True
Timer2.Interval = 10
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
Timer2.Interval = 1000
End Sub
Private Sub Timer1_Timer()
If Picture1.CurrentX <= 1000 Then
Picture1.Left = Picture1.Left + 10
End If
End Sub
怎么改? 展开
Private Sub command1_click()
Timer1.Enabled = True
Timer2.Interval = 10
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
Timer2.Interval = 1000
End Sub
Private Sub Timer1_Timer()
If Picture1.CurrentX <= 1000 Then
Picture1.Left = Picture1.Left + 10
End If
End Sub
怎么改? 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询