首页
后端开发
VB
Visual Basic 6.0 MDI 窗口排列代码

Visual Basic 6.0 MDI 窗口排列代码

24 次浏览 0 条评论
ppt
ppt

在 Visual Basic 6.0 中，可以通过使用 Arrange 方法对多文档界面 (MDI) 中的子窗体进行排列。以下代码提供了对 MDI 子窗体进行排列的示例：

窗体加载事件

Private Sub MDIForm_Load()
    Form3.Show
    Form2.Show
    Form1.Show
End Sub

菜单命令事件

Private Sub ceng_Click()
    MDIForm1.Arrange vbCascade
End Sub

Private Sub exit_Click()
    End
End Sub

Private Sub horizontal_Click()
    MDIForm1.Arrange vbTileHorizontal
End Sub

Private Sub pai_Click()
    MDIForm1.Arrange 3
End Sub

Private Sub vertical_Click()
    MDIForm1.Arrange vbTileVertical
End Sub

通过使用上述代码，可以实现以下排列效果：

  • 层叠 (Cascade)：子窗体以重叠的方式排列。
  • 水平平铺 (TileHorizontal)：子窗体水平并排排列。
  • 垂直平铺 (TileVertical)：子窗体垂直并排排列。
  • 填充 (3)：子窗体尽可能填充 MDI 客户端区域，并尽可能平分可用空间。
ppt 文件大小：3.47MB