vb的小问题
我做这样一个设计：form1中有下拉列表combo1，设其中有1，2两项，command0一个。form2中有command1,command2大小一样，重叠，初始时command1在上。 希望达到效果：选1时，点击command0，form2弹出，且command1在上，选2时，点击command0,form2弹出，且commad2在上。 只需说明如何使form2出现时，command2在上 QQ： 9 如果可以，小弟愿提高悬赏
受Soidco2回答的启发,用如下代码可达要求:
Option Explicit
Dim aa As Byte
Private Sub Combo1_Click()
aa = Combo1
Command0。Enabled = True
End Sub
Private Sub Command0_Click()
If aa = 1 Then
Form2。
Command1。ZOrder 0
ElseIf aa = 2 Then
Form2。Command2。ZOrder 0
End If
Form2。Show
End Sub
Private Sub Form_Unload(Cancel As Integer)
End
End Sub
这里FORM2中COMMAND1及COMMAND2谁在前并不重要。
而且假如COMMAND2在前,则可在VB6调试窗口,用鼠标右键点击COMMAND2选置后即可。
在Form1中输入以下代码
：
Private Sub Form_Load()
Combo1.AddItem "命令1"
Combo1.AddItem "命令2"
Combo1.ListIndex = 0
End Sub
Private Sub Command1_Click()
Form2.Show
If Combo1.Text = "命令1" Then
Form2.Command1.Visible = True
Form2.Command2.Visible = False
Else
Form2.Command1.Visible = False
Form2.Command2.Visible = True
End If
End Sub
当然，上述所有的“命令1”和“命令2”可改成你想要的文字
用ZOrder过程 在Form2的过程中写 Sub Form_Load() mand2.zorder 0 end sub sub form_unload() mand1.zorder 0 end sub OK?
分别设置command1, command2的Visible属性为true或false即可
既然command1和command2在一个位置，完全可以只用一个，不同选择（1 或2 ）时改变其外观属性caption(改为"command1"或"command2")即可；至于点击按钮后执行的操作，完全可以根据其外观是"command1"还是"command2"来执行不同的操作。也可以声明一个变量来跟踪纪录不同的选择，据此来执行不同的操作。
VB里不必要这样弄层叠关系，你可以这样： load form2 sable=false sable=true ow 这样form2显示出来时就是command2出现了，反之你把false和true调换就行了。
答：1. Private Sub Command1_Click() Print Combo1.Text End Sub 2. 用 Label 来放数据，对齐 Lab...详情>>
答：文章搜索： 名称 全文 文章 首页 IT资讯 开发语言 软件开发 WEB开发 考试认证 数据库 程序人生 编程学院 电子书籍 热点专题 编程论坛 计算机论文...详情>>
答：你好，你直接按键盘 vb12 就好了。详情>>
