access-vba

    0熱度

    2回答

    所以我一直負責創建一個跟蹤數據庫&我遇到了一個讓我發瘋的問題。 我已經創建了一個輸入表單,並且爲了便於使用,我需要創建自定義導航按鈕,我已經完成了這個工作,並且它們工作正常。 我已添加代碼到當前事件以禁用按鈕,如果在第一條記錄/最後一條記錄 - 再次這工作正常。 這是我卡住的地方,只要我禁用了內置的導航按鈕,它就會禁用我創建的自定義按鈕。如果我刪除當前的事件代碼,他們再次工作,但不是我打算如何。

    0熱度

    1回答

    我的VBA代碼,我得到了與它的數字和一個按鈕列表框,我想在列表框中顯示的數量,你以另一種形式選擇 例如我想從1買了數字鍵的10,如果我選擇3,我想接下來的形式展現你買了3個按鍵 Private Sub List28_Click() If Not IsNull([num of keys]) Then Forms! [navigation forms].Form.[navigationsubfor

    0熱度

    1回答

    Private Sub bBrowse_Click() Const msoFileDialogFilePicker As Long = 3 Dim objDialog As Object Set objDialog = Application.FileDialog(msoFileDialogFilePicker) With objDialog .AllowMulti

    0熱度

    1回答

    我試圖將某些個人分類爲「Flights」。飛行中不能超過10人,並且我正在循環查看記錄集,根據現有航班中的人數來確定每個人應該乘坐哪個航班。 所以它應該理想地看看錶,做的人的數量的動態計數飛行1,如果這個數字是< = 10,然後繼續前進,寫記錄,如果不增加航班數量,並再次去,直到所有的運動員都被分配。 記錄集似乎並沒有表明它何時到達EOF並且一直跳回到Move First,並且它無止境地循環遍歷記

    0熱度

    1回答

    我正在回收舊數據庫中的代碼。 對於一個人,位於全國各地的一半,我相信可能有一些連接問題。 Public Function BackUpBackend() Dim Source As String Dim Target As String Dim retval As Integer Source = "\\network\backend\accessfil

    0熱度

    1回答

    我正在使用下面的代碼來審計我的表單以進行更改。當我使用tbl_MBR上的ID字段「MBRID」時,它可以很好地工作。但是,當我使用tbl_ItemMaster上的ID字段「IMID」時,出現錯誤:無法找到表達式中引用的字段「IMID」。任何想法爲什麼IMID無法找到? Private Sub Form_AfterDelConfirm(Status As Integer) If Status =

    0熱度

    2回答

    我有一列有數據,如year(date)或date-365。 如何將此文本用作代碼而不是文本?意思是,我希望能夠做到像 me.ProjectName="ddddd " & MyColumnWithCode ,並得到ddddd 2017或ddddd 10/21/2016 我做了谷歌在各個方面我能想到的,並沒有得到任何東西。

    0熱度

    1回答

    Hy人人專家! 我想通過從MS Access中的子窗體中選擇一行來填充主窗體,但它不工作, 這是主窗體! 在主要形式的每個控件綁定到數據源。 這是子窗體! 在這種形式我想通過選擇任何行形成子表單來填充行數據的主要形式。當我標記紅色。當我選擇它時,它應該自動填入主窗體。我試圖通過調用這樣的參考。 me.ShiftProdRecord2_Query_SubForm = textbox.value

    0熱度

    1回答

    使用DoCmd.TransferText()時,我的SCHEMA.INI文件被忽略 我SCHEMA.INI文件被ignored.I得到相同的結果我是否在同一個文件夾中的文件scheme.ini我的標籤文件與否。所有的列結束在一個列中。我正在嘗試使用schema.ini,因爲我正在導入製表符分隔的文件。如果嘗試導入逗號分隔文件,結果非常有意義。 所以我的假設是,schema.ini文件被忽略。 我正

    0熱度

    1回答

    我正試圖將一個窗體/子窗體名稱傳遞給一個函數,但沒有成功。該功能通過子窗體上的每個.Control控制,並執行一組簡單的查詢操作。我的代碼正常工作與表單/子表單名稱硬編碼;我正在尋找更通用的方法。 在函數調用中獲取類型不匹配錯誤,使用和不使用引號。 實施例: 'Function Call call AuditChanges("forms![someForm]![someSubForm]"