在字符串值中輸入括號

我試圖爲包含括號的字符串變量輸入一個值。在字符串值中輸入括號

ValueString = "'("&data1&"')"

對於此示例，數據1具有值6（I證實該變量在這之前的代碼行的值）

我想的valueString的值設定爲（6）

運行時，突出顯示&"')"的「預計結束語句」。

我已經嘗試了這種語法的許多變體，結果相同。

有什麼建議嗎？

來源

2016-01-27 Robert Kendall

公共Sub Import2（FileName As Variant） Dim wb As Object，ws As Object Dim xl As Object Set xl = CreateObject（「excel.Ap折襞「）昏暗適量作爲字符串昏暗的valueString作爲字符串設置WB = xl.Workbooks.Open（文件名）集WS = wb.worksheets（」對於導出「） DATA1 = ws.cells（2，1）數據2 = ws.cells（2,2）數據3 = ws.cells（2，3）的valueString = 「（」＆DATA1＆「）」 QS = 「INSERT INTO MAF（FormDate）VALUES＆的valueString」的DoCmd .RunSQL qs 'CurrentDb.Execute qs'當我運行這個時，我得到了「INSERT INTO語句中的語法錯誤」本地窗口顯示（4/1/2016），這正是我想要的。 –

或者使用格式：

ValueString = Format(data1, "(0)")

來源

2016-01-27 13:53:19 Gustav

前後&字符包括空格：

ValueString = "'(" & data1 & "')"

問題是因爲Access解釋data1&意味着一個命名變量data1類型爲長。

由於LiamH pointed out，如果你想ValueString包含（6）的代替'（6'），除去撇號：

ValueString = "(" & data1 & ")"

來源

2016-01-27 12:56:51 HansUp

刪除撇號以返回所需的結果。目前這個答案給出了''（6'）' – LiamH

在字符串值中輸入括號

回答

相關問題