十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
因为VB.NET的源码中字符串常量是用英文双引号开始和结束的,如:"abc",如果要显示引号,输入"""是错误的,要4个英文双引号才能显示一个正确的英文双引号,如:MsgBox("""")。
创新互联是专业的澄江网站建设公司,澄江接单;提供成都网站建设、网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行澄江网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
我建议vb.net的话,别像vb6那样用几个引号来代替一个引号,因为这种方式非常不直观,而且很容易出错。建议用以下两种方式表示:
1、controlchars.quoto
表示一个引号。
或者
2、chr(34)
表示ascii码为34的字符,正好就是引号
Start "(" controlchars.quoto textbox_XXX.text controlchars.quoto ")"
中文引号直接放在字符串里面即可,英文引号用Chr(34)表示,如
Dim phrase As String = "a" Chr(34) "b"
使用转义字符 \(C#)
要输出\请用\\即可
你的问题是"所以用\"就行了
Vb.net中的转义字符为'
这是 VISUAL BASIC IDE 一项智能化的功能,能防止你错误输入全角标点出错.不止是双引号,,()等也这样.我记得在VS设置里能改,但忘了在哪了.你找一找
可以根据字符的ASCII编码来进行判断,ASCII的编码值为:0-127,可以把0-127以外的编码的字符作为汉字。
Dim a As String
Dim S As Integer '保存汉字的开始位置
Dim E As Integer '保存汉字的结束位置
Dim i As Integer
Dim b As String
S = 0
E = 0
a = "4651让各位serg6546.,serg6546"
For i = 1 To Len(a)
If Asc(Mid(a, i, 1)) = 0 And Asc(Mid(a, i, 1)) = 127 Then
'这个是非汉字字符
If S = 0 Then
'还没有找到汉字的开始位置
'不做任何处理
Else
'已经找到汉字的开始位置
'那么现在这个是汉字的结束位置
'保存汉字的结束位置,然后结束循环
E = i - 1
Exit For
End If
Else
'这个是汉字字符
'如果还没有保存汉字开始位置,
'那么这个就是汉字的开始位置,保存下来
If S = 0 Then
S = i
End If
End If
Next i
'现在知道了S中是汉字的开始位置,
'E中是汉字的结束位置
'现在把原来的字符串分成三段,然后加上双引号
b = Left(a, S - 1) """" Mid(a, S, E - S + 1) """" Mid(a, E + 1)
'看看结果
MsgBox b