
界面设计窗口,在
工具箱找到Text,双击,界面上就会出现一个Text1
控件了
界面设计窗口,在工具箱找到Text,双击,界面上就会出现一个Text1控件了界面设计窗口,在工具箱找到Text,双击,界面上就会出现一个Text1控件了界面设计窗口,在工具箱找到Text,双击,界面上就会出现一个Text1控件了Private Sub Form_Load() If Text1.Text <>"xxx" Then Me.Command1.Enabled = False End IfEnd SubPrivate Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) If Text1.Text = "xxx" Then Me.Command1.Enabled = True Else Me.Command1
评论列表(0条)