![]() ![]() ![]() ![]() |
|||||
|
|||||
樓主 pheby ![]()
![]() |
我己於表單製作了一個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
|