frmmain.frm

基于个人的名片管理系统

VERSION 5.00
Begin VB.MDIForm frmMain 
   BackColor       =   &H8000000C&
   Caption         =   "记事本-通讯录"
   ClientHeight    =   7050
   ClientLeft      =   165
   ClientTop       =   450
   ClientWidth     =   9600
   Icon            =   "frmMain.frx":0000
   LinkTopic       =   "MDIForm1"
   StartUpPosition =   2  '屏幕中心
   Begin VB.Menu card 
      Caption         =   "名片管理"
   End
   Begin VB.Menu client 
      Caption         =   "客户管理"
   End
End
Attribute VB_Name = "frmMain"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub card_Click()
    frmCard.Show
End Sub

Private Sub MDIForm_Load()
    frmCard.Show
End Sub