【VB开源代码栏目提醒】:网学会员为广大网友收集整理了,MDIForm1.frm,希望对大家有所帮助!
VERSION 5.00
Begin VB.MDIForm MDIForm1
BackColor = &H8000000C&
Caption = "MDIForm1"
ClientHeight = 3195
ClientLeft = 165
ClientTop = 735
ClientWidth = 4680
LinkTopic = "MDIForm1"
StartUpPosition = 3 'Windows Default
Begin VB.Menu mnuFile
Caption = "数据文件"
Begin VB.Menu mnuSequence
Caption = "顺序文件"
End
Begin VB.Menu mnuRandom
Caption = "随机文件"
End
Begin VB.Menu mnuBinary
Caption = "字节文件"
End
Begin VB.Menu mnuExit
Caption = "退出"
End
End
End
Attribute VB_Name = "MDIForm1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub MDIForm_Load()
Me.Caption = "MDI窗体"
Me.Height = 4800
Me.Width = 5200
Me.Arrange 0
End Sub
Private Sub mnuBinary_Click()
FrmBin.Show
End Sub
Private Sub mnuExit_Click()
End
End Sub
Private Sub mnuRandom_Click()
FrmRnd.Show
End Sub
Private Sub mnuSequence_Click()
FrmSequ.Show
End Sub
上一篇:
MD2.frm
下一篇:
那些令你为之触动的好句子,感慨万分