[实用参考]VB设计题汇编.pptVIP

添加标签caption属性为“请您输入您的昵称”的label控件；添加一个文本框和一个caption属性为“下一步”的命令按钮，其enabled属性为false. Private Sub Text1_Change() Command1.Enabled = True Form1.Caption = Text1.Text End Sub 单选框复选框框架控件应用 Private Sub c1_Click() If ch1 And ch2 Then Text1.Text = 报名参加篮球和排球比赛 ElseIf ch1 Then Text1.Text = 报名参加篮球比赛 ElseIf ch2 Then Text1.Text = 报名参加排球比赛 Else Text1.Text = End If End Sub 菜单设计 添加一个文本框,其text属性为“欢迎使用vb” 添加菜单：选择工具菜单下的菜单编辑器，添加如图菜单, 编辑器中的可见属性不选(即菜单不可见). Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu kj （即鼠标右键时弹出快捷菜单） End Sub Private Sub add