mdifrmmain.frm

来自「上传的文件是针对小区物业管理的程序」· FRM 代码 · 共 59 行

VERSION 5.00
Begin VB.MDIForm MDIFrmmain 
   BackColor       =   &H8000000C&
   Caption         =   "物业管理系统"
   ClientHeight    =   4515
   ClientLeft      =   165
   ClientTop       =   735
   ClientWidth     =   7740
   Icon            =   "MDIFrmmain.frx":0000
   LinkTopic       =   "MDIForm1"
   StartUpPosition =   3  'Windows Default
   WindowState     =   2  'Maximized
   Begin VB.Menu m_file 
      Caption         =   "文件(&F)"
      Begin VB.Menu m_exit 
         Caption         =   "退出(&X)"
      End
   End
   Begin VB.Menu m_in 
      Caption         =   "入住管理(&I)"
      Begin VB.Menu m_in_rec 
         Caption         =   "入住登记"
      End
      Begin VB.Menu m_in_w 
         Caption         =   "水电煤气表初值登记"
      End
      Begin VB.Menu m_in_rep 
         Caption         =   "装修管理"
      End
      Begin VB.Menu m_in_carpos 
         Caption         =   "车位服务"
      End
   End
End
Attribute VB_Name = "MDIFrmmain"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub m_exit_Click()
    Unload Me
End Sub

Private Sub m_in_carpos_Click()
    carService.Show vbModal
End Sub

Private Sub m_in_rec_Click()
    residentResign.Show vbModal
End Sub

Private Sub m_in_rep_Click()
    repairManagement.Show vbModal
End Sub

Private Sub m_in_w_Click()
    useManagement.Show vbModal
End Sub