Private Sub Command1_C1ick() Command2.Visible=True Command3.Visible=False End Sub Private Sub Commandl_C1ick() Command2.Enabled=True Command3.Enabled=False End Sub Private Sub Conunand1_C1ick() Command2.Enabled=True Command3.Visible=False End Sub Private Sub Command1_Click() Command2.Visible=True Command3.Enabled=False End Sub