VB问题,关于组合框

来源:百度知道 编辑:UC知道 时间:2024/05/14 05:26:08
设计个人主页,用组合框选择页面跳转,组合框应至少有3个选项,个人资料,学习情况及交友要求.每点击其中一项时,可以跳转到相应窗体.请编写属性和代码

Private Sub Combo1_Change()
Combo1.AddItem "请选择窗体"
Combo1.AddItem "窗体1"
Combo1.AddItem "窗体2"
Combo1.AddItem "窗体3"
End Sub

Private Sub Combo1_Click()
Select Case Combo1
Case "窗体1"
Form1.Show
Case "窗体2"
Form2.Show

Case "窗体3"

Form3.Show
End Select
End Sub
在主页面加个combobox然后把上面的代码写上就OK,不过记得窗体的名字要对应
时代网站设计 http://www.timekn.cn/website/index.php

那就比如用CHECK选择框做,弄成CHECK1,2,3那代码在CHECK点击事件中写
IF CHECK1.value=1 then
个人资料FORM的名字.show
这FORM名字.hide
endif
依次类推