Private subcommand 1_Click ()
If a<3 then marks 1. Visible = true
If a>= 3 and a<= 6, then mark 2. Visible = true
If a>6 then marks 3. Visible = true
End joint
Private Sub-Form _Load ()
Label 1。 Visible = false
Label 2. Visible = false
Label 3. Visible = false
Label 1。 Caption = "Shangshangqian"
Label 2. Caption = "Medium Label"
Label 3. Caption = "Download and sign"
End joint
Private sub-timer 1_Timer ()
a = Int(Rnd() * 10)
Print a copy
End joint