1,在窗体上,建立多个Frame控件。
2,在不同的Frame控件上建立多个不同的操作画面。
3,启动时,将除第一个Frame控件外,都隐藏。
4,点Frame控件上的切换时,隐藏自身,然后显示第2个Frame控件。
5,点第2个Frame控件上的切换时,隐藏自身,然后显示第3个Frame控件。
6,依次操作,即可达到这个要求。
你可以添加多个PictureBox控件,在每个中间添加不同的文字和图片以及控件,然后将暂时不需要显示的那些PictureBox控件的Visible属性都设置为False,值留下其中一个为True的。当需要些换到另外画面时,可以在按钮单击事件中将当前画面所属的PictureBox控件的Visible设为False,而将需要展现的画面PictureBox控件的Visible属性sheweitrue。
1.准备多个按钮和Frame或者Picture等容器 都弄成数组 如 cmd(0-5) 按钮
fram(0-5) Frame
2.每个Fram里面画上你需要的东西
3.按钮点击事件写代码
Private Sub cmd_Click(Index As Integer)
Dim i As Integer
For i = Fram.LBound To Fram.UBound
If i = Index Then
Fram(i).Visible = True
Else
Fram(i).Visible = False
End If
Next
End Sub
1.准备多个按钮和Frame或者Picture等容器
都弄成数组
如
cmd(0-5)
按钮
fram(0-5)
Frame
2.每个Fram里面画上你需要的东西
3.按钮点击事件写代码
Private
Sub
cmd_Click(Index
As
Integer)
Dim
i
As
Integer
For
i
=
Fram.LBound
To
Fram.UBound
If
i
=
Index
Then
Fram(i).Visible
=
True
Else
Fram(i).Visible
=
False
End
If
Next
End
Sub