无法使用变量创建逗号分隔的输出字符串
Trouble creating a comma-separated output string using variables
我正在尝试创建一个字符串输出,其中每个变量都用引号括起来并用逗号分隔。这是我正在尝试使用的代码。
objOutputFile7.WriteLine(""& strCodeSetName & "'","'" & strCreateID & "'","'" & strSiteCode & "'","'" & strSiteName & "'","'" & strSiteName &"'",""false",,,,"false"")
我一直在 2 个不同的错误之间徘徊。告诉我 a 在调用 Sub 时不能使用括号的人。另一个声明它期望在其中一个变量名称中有一个右括号。
我查看了在线资源,但找不到相近的示例。有人可以帮我解决我的难题吗?
很难确切地知道你的输出是什么 expect/want,但也许是这样的?
objOutputFile7.WriteLine "'" & strCodeSetName & "','" & _
strCreateID & "','" & strSiteCode & "','" & _
strSiteName & "','" & strSiteName & "',false,,,,false"
一种可能是使用 Join
函数。您必须创建一个包含所有变量的数组...
Dim outLine as String
Dim myValues as Variant
myValues = Array(strCodeSetName, strCreateID, strSiteCode, _
strSiteName, strSiteName, "false,,,,false")
outLine = Join(myValues, ",")
objOutputFile7.WriteLine outLine
我正在尝试创建一个字符串输出,其中每个变量都用引号括起来并用逗号分隔。这是我正在尝试使用的代码。
objOutputFile7.WriteLine(""& strCodeSetName & "'","'" & strCreateID & "'","'" & strSiteCode & "'","'" & strSiteName & "'","'" & strSiteName &"'",""false",,,,"false"")
我一直在 2 个不同的错误之间徘徊。告诉我 a 在调用 Sub 时不能使用括号的人。另一个声明它期望在其中一个变量名称中有一个右括号。
我查看了在线资源,但找不到相近的示例。有人可以帮我解决我的难题吗?
很难确切地知道你的输出是什么 expect/want,但也许是这样的?
objOutputFile7.WriteLine "'" & strCodeSetName & "','" & _
strCreateID & "','" & strSiteCode & "','" & _
strSiteName & "','" & strSiteName & "',false,,,,false"
一种可能是使用 Join
函数。您必须创建一个包含所有变量的数组...
Dim outLine as String
Dim myValues as Variant
myValues = Array(strCodeSetName, strCreateID, strSiteCode, _
strSiteName, strSiteName, "false,,,,false")
outLine = Join(myValues, ",")
objOutputFile7.WriteLine outLine