mdlmain.bas
来自「企业资产管理信息系统」· BAS 代码 · 共 11 行
BAS
11 行
Attribute VB_Name = "MdlMain"
Public constr As String '数据库联结字符串
Public Sub Main()
constr = "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path & "\database\资产管理系统97.mdb;" '设定数据库
frmMain.Show '启动
End Sub
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?