我的界面上有4个按钮,要实现各个按钮之间的选中和切换,即要得到光标和失去光标的
我下面的程序怎么不行呀,老说变量未定义???????????
Private Sub Command1_GotFocus()
Command1.BackColor = Gotcolor
End SubPrivate Sub Command1_LostFocus()
Command1.BackColor = Lostcolor
End SubPrivate Sub Command2_GotFocus()
Command2.BackColor = vbRed
End SubPrivate Sub Command2_LostFocus()
Command2.BackColor = vbBlack
End Sub
Private Sub Command3_GotFocus()
Command3.BackColor = vbRed
End SubPrivate Sub Command3_LostFocus()
Command3.BackColor = vbBlack
End Sub
我下面的程序怎么不行呀,老说变量未定义???????????
Private Sub Command1_GotFocus()
Command1.BackColor = Gotcolor
End SubPrivate Sub Command1_LostFocus()
Command1.BackColor = Lostcolor
End SubPrivate Sub Command2_GotFocus()
Command2.BackColor = vbRed
End SubPrivate Sub Command2_LostFocus()
Command2.BackColor = vbBlack
End Sub
Private Sub Command3_GotFocus()
Command3.BackColor = vbRed
End SubPrivate Sub Command3_LostFocus()
Command3.BackColor = vbBlack
End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货