⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 modmain.bas

📁 library system for students..these is very useful system.....
💻 BAS
字号:
Attribute VB_Name = "modMain"
Option Explicit
Global gblConnectionString As String

Public Enum DatabaseOperation
    None = 0
    Add = 1
    Edit = 2
End Enum

Public Enum colBookGrid
    colBookReferenceNumber = 0
    colBookTitle = 1
    colBookEdition = 2
    colBookVolume = 2
End Enum

Public Enum colPublisherGrid
    colPublisherID = 0
    colPublisherName = 1
End Enum

Public Enum colAuthorGrid
    colAuthorCheckBox = 0
    colAuthorID = 1
    colAuthorName = 2
End Enum

Public Enum colLibraryItemGrid
    colLibraryItemNo = 0
    colLibraryItemStatus = 1
End Enum


Public Sub Main()
    gblConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=CLAHS;Data Source=(local)"
    'frmPublisher.Show
    'frmBorrower.Show
    frmBook.Show
End Sub



⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -