福建省计算机二VB设计题目含答案.docVIP

二级VB设计题 ListBox相关属性：；； 在属性窗口中设置列表框的list属性，按ctrl+回车表示输入下一个项目 相关代码如下： Private Sub C1_Click() Form1.Picture = LoadPicture(k:\fjexam95\jztx.bmp) End Sub Private Sub C2_Click() Form1.Picture = LoadPicture() End Sub  标签控件属性：；； 滚动条控件属性：；；； 菜单编辑器按钮： 将菜单降级为子菜单按钮： 相关代码如下： Private Sub Add_Click() Label1.Caption = Val(Text1.Text) + Val(Text2.Text) End Sub Private Sub Sub_Click() Label1.Caption = Val(Text1.Text) - Val(Text2.Text) End Sub Private Sub Clean_Click() Label1.Caption = Text1.Text = Text2.Text = End Sub  相关代码如下： Private Sub Command1_Click() Text1.Visible = False End Sub Private