?? link.bas
字號:
Attribute VB_Name = "link"
Public Sub link()
Set Mcon = New ADODB.Connection
Mcon.ConnectionString = "Provider=sqloledb;Data Source=zhw;Initial Catalog=SuperMarketdb;User Id=sa;Password=820527;"
Mcon.Open
End Sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =