在access vba中，因為要對表中數據的操作，編寫代碼經常需要調用SQL語句。

我們通常不會在VBA代碼中鍵入復雜的查詢語句，而是在查詢的設計視圖中創建一個查詢，將其切換到SQL視圖，復制并粘貼到VBA中。

但是如果sql語句太長，我們需要折行，同時要整理引號和行尾

1. 創建一個新窗體，添加一個選項卡控件，的第一頁中，添加一個未綁定的文本框，名為“txtSql”。

2. 在選項卡控件的第二頁，添加另一個未綁定的文本框，將其命名為“txtVBA ”。

3. 最后添加命令按鈕，將其命名為“cmdSql2Vba”。

詳細按鈕代碼：

Private Sub cmdSql2Vba_Click() Dim strSql As String 'Purpose: Convert a SQL statement into a string to paste into VBA code. Const strcLineEnd = " "" & vbCrLf & _" & vbCrLf & """" If IsNull(Me.txtSql) Then Beep Else strSql = Me.txtSql strSql = Replace(strSql,

總結

以上是生活随笔為你收集整理的access 导入 txt sql语句_access将SQL语句从查询复制到VBA的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。