Vb里字符串加引号咋个弄？

Posted 2023-03-18

比如：
a.WriteLine
"姓名","学号"，"成绩" 这样写不行

咋样把字符串里的引号加进去啊

双引号的ASCLL码是34，可用Chr(34)代替
a.WriteLine Chr(34) & "姓名" & Chr(34) & "," _
& Chr(34) & "学号" & Chr(34) & "," _
& Chr(34) & "成绩" & Chr(34)

参考资料：My大脑

参考技术A """姓名"""

Private Sub Command1_Click()
Print """姓名""，"; """学号""，"; """成绩"""
End Sub 参考技术B 因为VB对"号有特殊用途，所以我的做法是：先用单引号代替，然后替换输出。
如：
a.WriteLine replace("'姓名','学号','成绩'","'","""") 参考技术C 添加一行代码：
Const VB_DQM As Byte = """" 'DQM=Double Quotation Marks，双引号
然后将待转换字符串复制到记事本中，选定最外面的两个双引号所括起来的那一段，把其中的双引号(")替换成 " & VB_DQM & " (花括号里面的这些，不包括花括号)即可。这是相对简单的办法。 参考技术D 实你可以试一下的，我试了一下，在代码中给Text1.Text赋值为一个引号时，VB自动增加了一个引号，成了下面这样（共四个引号）：

Text1.Text = """"

当我需要写两个引号（我让他们中间多了一个空格）时，是下面这样：
Text1.Text = """ """