Excel 在Visual Basic中将整数打印为字符串
在Visual Basic中 我有下面的代码编写,但我有问题打印它的字符串格式 虽然它是整数类型。为了节省时间,我不重复同样的内容 超过30个号码的东西Excel 在Visual Basic中将整数打印为字符串,excel,vba,Excel,Vba,在Visual Basic中 我有下面的代码编写,但我有问题打印它的字符串格式 虽然它是整数类型。为了节省时间,我不重复同样的内容 超过30个号码的东西 Dim line As Integer line = 0 Sub DisplayModule(page As Integer, line As Integer) maxline = 100 For line = 0 To maxline Print #page, Spc(6); "Display in String" Print #p
Dim line As Integer
line = 0
Sub DisplayModule(page As Integer, line As Integer)
maxline = 100
For line = 0 To maxline
Print #page, Spc(6); "Display in String"
Print #page, Spc(8); "{"
Print #page, Spc(10); """line"""
Print #page, Spc(8); "}"
Print #page, Spc(8); "next"
Next
End Sub
问题-它正在显示:
Display in String
{
line
}
"next line please"
{
line
}
.
.
我希望它以“”的形式显示:
我找不到像这样的衣服。
谢谢你的帮助。试试这个
Print #page, Spc(10); chr(34) & line & chr(34)
试一试
@彼得。给您带来的不便,我深表歉意:很高兴,先生-我很喜欢那场比赛)谢谢您节省了我的时间。
Print #page, Spc(10); chr(34) & line & chr(34)
Dim line As Integer
line = 0
Sub DisplayModule(page As Integer, line As Integer)
maxline = 100
For line = 0 To maxline
Print #page, Spc(6); "Display in String"
Print #page, Spc(8); "{"
Print #page, Spc(10); """" & line & """"
Print #page, Spc(8); "}"
Print #page, Spc(8); "next"
Next
End Sub