CommandButton1.Visible = IIf(CommandButton1.Visible = True, False, True)
CommandButton2.Visible = IIf(CommandButton2.Visible = True, False, True)
CommandButton3.Visible = IIf(CommandButton3.Visible = True, False, True)
CommandButton4.Visible = IIf(CommandButton4.Visible = True, False, True)