30-03-2008, 04:46 AM
Make the admin panel a form named frmAdmin.
Then add use this into frmMirage code:
Then add use this into frmMirage code:
Code:
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then
If Player(MyIndex).Access > 0 Then
frmAdmin.Visible = True
End If
End If
End Sub