台灣最大程式設計社群網站
線上人數
1065
 
會員總數:244680
討論主題:188774
歡迎您免費加入會員
討論區列表 >> VB6 >> 用vb 寫 access 的登入介面
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
用vb 寫 access 的登入介面
價值 : 10 QP  點閱數:2208 回應數:0

樓主

pheby
門外漢
0 5
44 10
發送站內信


我己於表單製作了一個covering 作access 的登入介面,並設定兩個按扭一個是click 入資料表, 另一個click 入表單:
問題一:怎樣使access 於第一時間啟動covering並把access 原本的表縮小呢?
問題二:按鈕click 入表單無問題,但怎樣可以click 入資料表呢?

問題一的語法現寫到如下:
Private Sub Form_Open(Cancel As Integer)
' Minimize the database window and initialize the form.

On Error GoTo Form_Open_Err

' Minimize the database window.
DoCmd.SelectObject acForm, "Covering", True
DoCmd.Minimize

' Move to the switchboard page that is marked as the default.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = '預設' "
Me.FilterOn = True

Form_Open_Exit:
Exit Sub

Form_Open_Err:
MsgBox Err.Description
Resume Form_Open_Exit

End Sub


問題二的按鈕click 入表單語法現寫為如下﹐怎樣修改為click 資料表呢?
Private Sub Command1_Click()
DoCmd.OpenForm "Index"
DoCmd.Maximize '最大化
End Sub

本篇文章發表於2007-08-29 12:18
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
目前尚無任何回覆
   

回覆
如要回應,請先登入.