Các bác giúp dùm em bài tập VB6 này dùm em với.Em đang rất gấp

[sunshine]

Em có bài tập này mong các bác, anh, chị giúp dùm.
Bài 1: Là lập trình khi mà click 1 cái thì có 1 cái ô đỗi màu. Click 1 cái nữa thì nó đổi màu khác. Click 1 cái nữa thì trở lại màu cũ.
Bài 2: Làm màn hình đăng nhập: yêu cầu chỉ cần nhập pass wolrd, nick , re pass world nếu đúng thì nó hiện ra thông báo đã nhập đúng pass world và lưu vào filse notopad. Còn sai thì báo là ban đã nhập sai, yêu cầu nhập lại.
Bài 3: Khi nhập + bấm nút nhập thì nó hiển thị ở ô label ở dưới, nhập số và và bấm nhập thì nó bổ sung ở ô label bên dưới. Cuối cùng tìm min max (Yêu cầu là 1 nút ,bấm 1 cái thì tim min , bấm cái tìm Max) và nút sấp xếp ( Bấm cái chiều lớn dần, bấm cái 2 chiều nhỏ dần.

[vandat07]

Đã 2 năm em không dùng lại VB nên lênh còn rườm rà
bác dùng thử cái này
Câu 1:

Dim a As Single

Private Sub Form_Load()
a = 1
Label1.BackColor = vbYellow
End Sub

Private Sub Label1_Click()
a = a + 1
If a = 4 Then a = 1
If a = 1 Then Label1.BackColor = vbYellow
If a = 2 Then Label1.BackColor = vbRed
If a = 3 Then Label1.BackColor = vbGreen

End Sub