獲取從第一行，其中列名<value>

Question

我有一個表格的值，其中用戶插入一些值

當用戶點擊「確定」按鈕進入，使新表從保存的值表單關閉時消失。

strSQL = "CREATE TABLE tblTempProjectGegevens (Project varchar(32),ProjectNummer varchar(32), Opdrachtgever varchar(32));" 

DoCmd.RunSQL (strSQL) 

strSQL = "INSERT INTO tblTempProjectGegevens (Project, ProjectNummer, Opdrachtgever)" & _ 
     "VALUES ('" & ProjectInvoer.Value & "', '" & ProjectNrInvoer.Value & "', '" & OpdrachtgeverInvoer.Value & "');" 

DoCmd.RunSQL (strSQL) 

DoCmd.OpenForm "frmMain", acNormal, , , acFormAdd 
DoCmd.Close acForm, "frmProjectInvoer", acSaveNo 

我將這些值保存在一個表中，因爲我的程序要求將窗體關閉。

當用戶在使用我的訪問文件來完成，也有一些報道打印出來。在這些報告的頭文件中，我希望我保存在臨時表中的值。

我如何在我的報告標題從表中的值？在report_load（）事件期間？

Answer 1

Private Sub Report_Open(Cancel as Integer) 
Dim db as Database 
Dim rec as Recordset 

Set db = CurrentDb 
Set rec = db.OpenRecordset("tblTempProjectGegevens") 

Me.Project.Value = rec("Project") 
Etc... 

End Sub