form1.frm

来自「主要实现数据库的日志管理功能」· FRM 代码 · 共 45 行

VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   4200
   ClientLeft      =   165
   ClientTop       =   855
   ClientWidth     =   5880
   LinkTopic       =   "Form1"
   ScaleHeight     =   4200
   ScaleWidth      =   5880
   StartUpPosition =   3  'Windows Default
   Begin VB.Menu a 
      Caption         =   "a"
   End
   Begin VB.Menu b 
      Caption         =   "b"
   End
   Begin VB.Menu c 
      Caption         =   "c"
   End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim e As DailyManage.ClsDailyManage

Private Sub a_Click()
e.yngc_mnuSelectDaily
End Sub

Private Sub b_Click()
e.yngc_mnuPrintDaily
End Sub

Private Sub c_Click()
e.yngc_mnuDelDaily
End Sub

Private Sub Form_Load()
Set e = New DailyManage.ClsDailyManage
e.showform
End Sub