Public Function HQReport() As String
Dim StrSQL As String
Dim FI_Code As String
FI_Code = Me.Report
StrSQL = "select * into [excel 8.0;database=123.xls].[sheet1] from Table_Final_LOAB where [FI_Code] =" & FI_Code & ""
DoCmd.RunSQL StrSQL
End Function
无效使用Me关键字?为什么会这样?