4个重叠在一起的picturebox,用来绘制不同参数的曲线,如何控制那一个在前显示
我在做一个工业用软件,现在要求显示不同采集参数的实时曲线,我想用4个重叠的Picturebox分别绘图,用option选择,当一个被选中时变显示,另外几个消隐。但是始终找不到如何去做。谢谢大家帮忙哈。敬请指教!!! --------------------编程问答-------------------- 把要显示的 PictureBox 的 .Visible = True, 不显示的 PictureBox 的 .Visible = False--------------------编程问答-------------------- 只显示第一个:
Picturebox1.Visible =True
Picturebox2.Visible =False
Picturebox3.Visible =False
Picturebox4.Visible =False
只显示第2个:
Picturebox1.Visible =False
Picturebox2.Visible =True
Picturebox3.Visible =False
Picturebox4.Visible =False
类推
--------------------编程问答-------------------- 我试过了 好像不行,当最上面的那个picturebox不可见时,位于其下面的所有的都被遮掩了应该 --------------------编程问答--------------------
这是你‘画’picturebox 的操作错误。
你先把这几个 picturebox 删除,再重新画:
画好第一个后,画第二个时(后同),一定要在窗体内的空白处点下鼠标,再拖动开始画。
画好后,再拖动它到要放置的位置去。
重复上面的操作,把需要的picturebox添加完。
--------------------编程问答-------------------- 用控件数组的方法:
Private Sub Command1_Click()
'四个 Picture1 组成数组,下标默认从 0 到 3
'DispPic 0 '显示第1个
DispPic 2 '显示第3个
End Sub
Private Sub DispPic(iIdx As Long)
Dim i&
For i = 0 To 3
If (iIdx = i) Then
Picture1(i).Visible = True
Else
Picture1(i).Visible = False
End If
Next
End Sub
--------------------编程问答--------------------
Private Sub Command1_Click()--------------------编程问答-------------------- thanks 谢谢各位 我试试 --------------------编程问答-------------------- 谢谢 这样可以 哈哈 以后有问题还得多请教你 --------------------编程问答-------------------- 又一个不结帐的,霸王餐看来好吃。
'四个 Picture1 组成数组,下标默认从 0 到 3
'DispPic 0 '显示第1个
DispPic 2 '显示第3个
End Sub
Private Sub DispPic(iIdx As Long)
Dim i&
For i = 0 To 3
If (iIdx = i) Then
Picture1(i).Visible = True
Else
Picture1(i).Visible = False
End If
Next
End Sub
补充:VB , 控件