vb第六章常用控件(二)(答案).docVIP

第六章 常用控件实验作业（二） 一、目的结合，掌握控件的基本属性、事件和方法要求Private Sub Command1_Click() End Sub 2、写出作业2程序中 “星期”单选按钮Option2的Click事件代码。 3、分别写出作业3中添加、删除、修改和修改确定四个命令按钮的Click事件代码。 4、写出作业4除法单选按钮Option4的Click事件代码。 5、写出作业5所有命令按钮的Click事件代码。 三、内容 作业2： 对列表框进行项目添加、修改和删除操作 要求：1、点击添加按钮时检查列表框，已有条目不允许添加。 2、只有选定列表框内容才可以进行删除。 3、点击修改按钮将列表框中选定内容送到文本框中，同时无法继续进行添加、删除、修改操作。（Enabled属性设置为False） 4、点击修改确定按钮，用文本框中的内容替换列表框中选定内容，同时可以继续进行添加、删除、修改操作。 Dim t As Integer Private Sub Command1_Click() Dim i As Integer, d As Integer i = 0 d = 0 Do While i = List1.ListCount - 1 If List1.List(i) = Text1.Text Then d = 1 End If i =