Flaming Arrow Glitter Purple

Rabu, 04 September 2013

Visual Basic ( Frame Visibility Activity )

 



CODE

Private Sub cmdExit_Click()
If MsgBox("Close Applet?", vbQuestion + vbYesNo, "Exit") = vbYes Then
    End
End If
End Sub

Private Sub cmdf1h_Click()
Frame1.Visible = False
End Sub

Private Sub cmdf2h_Click()
Frame2.Visible = False
End Sub

Private Sub cmdSf1_Click()
Frame1.Visible = True
Frame2.Visible = False
End Sub

Private Sub cmdSf2_Click()
Frame1.Visible = False
Frame2.Visible = True
End Sub

Ganti teks ini dengan informasi mengenai permalink atau apapun di sini.


Tidak ada komentar:

Posting Komentar

facebook komentar