新建 文本文档.txt

来自「学生考试系统 考试出题。。自动选题。选择难度」· 文本 代码 · 共 21 行

Private Sub Timer1_Timer()
If Label1.Left > 0 Then
Label1.Left = Label1.Left - 100
Else
Label1.Left = 4000






Private Sub Timer1_Timer()
If Label1.Top < 4200 Then

Label1.Top = Label1.Top + 100
Else
Label1.Top = 0
End If

End Sub