2. CODE L NH 'KHI NHAP 1 NUT (BIEU TUONG ) TRONG TOOLBAR PRIVATE SUB...

5. - TRẮC NGHIỆM KIẾN THỨC THPT” DỰA TRÊN NGÔN NG VISUAL BASIC
TRẮC NGHIỆM KIẾN THỨC THPT” DỰA TRÊN NGÔN NG VISUAL BASIC
5.2. Code l nh

'khi nhap 1 nut (bieu tuong ) trong toolbar

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)

Select Case Button.Key ' xac dinh nut duoc nhan

Case "mnucautiep":

Call MNUCAUTIEP_Click

Case "mnucautruoc":

Call MNUCAUTRUOC_Click

Case "mnuketqua":

Call MNUKETQUA_Click

Case "mnudapan":

Call MNUDAPAN_Click

Case "mnuthoat":

Call MNUTHOAT_Click

End Select

End Sub