UC知道vb 关于print 问题
来源：百度知道 编辑：UC知道 时间：2024/06/09 13:01:27
Private Sub Form_Click()
Dim a1 As String, a2 As String, i As Integer
a1 = "通过按键返回给用户信息"
a2 = " 测试MSGBOX函数的返回值"
i = MsgBox(a1, 2, a2)
If i = 3 Then Print "返回值i="; i, "表示用户按下了终止 "
If i = 4 Then Print "返回值i="; i, " 表示用户按下了重试"
If i = 5 Then Print "返回值i="; i, "表示用户按下了忽略"
End Sub
我想 运行时 选择的是终止 把终止带上引号
我照着书上是
If i = 3 Then Print "返回值i="; i, "表示用户按下了"终止" "但转行时他自动在终止引号前加了分号 运行时 终止没有加 引号 想问大家 要怎么做
谢谢
Dim a1 As String, a2 As String, i As Integer
a1 = "通过按键返回给用户信息"
a2 = " 测试MSGBOX函数的返回值"
i = MsgBox(a1, 2, a2)
If i = 3 Then Print "返回值i="; i, "表示用户按下了终止 "
If i = 4 Then Print "返回值i="; i, " 表示用户按下了重试"
If i = 5 Then Print "返回值i="; i, "表示用户按下了忽略"
End Sub
我想 运行时 选择的是终止 把终止带上引号
我照着书上是
If i = 3 Then Print "返回值i="; i, "表示用户按下了"终止" "但转行时他自动在终止引号前加了分号 运行时 终止没有加 引号 想问大家 要怎么做
谢谢
程序里用的是英文的符号，你可以在写为“终止”
如：
If i = 3 Then Print "返回值i="; i, "表示用户按下了“终止 ”"
不这样的话我还真想不到别的办法。
手动去掉引号
很简单
比如输出 "你好"
Print Chr(34);"你好";Chr(34)
Chr(x)代表返回ASCII码为x的字符，而英文双引号的ASCII码是34，所以Chr(34)就等于一个英文双引号
If i = 3 Then Print "返回值i="; i, "表示用户按下了""终止"""
________
个人偏向于用"转义，因为Chr是函数，效率会低一些哦~
nothign
