VB打印内容怎么换行?

来源:百度知道 编辑:UC知道 时间:2024/05/23 16:52:53
Printer.Print "兹有我公司"; Text5; "等壹同志,到贵处办理"; Text2; "相关事宜,望接洽。"

请问在什么位置加入什么样的语句可以实现我要打印的自动换行
请不要说在什么后面,或者连接什么的,直接写语句出来加到我的代码里面好不好?

我不知道会在什么位置换行,TEXT输入的文字说不准在什么位置,我需要的是自动换行

换行的话 用双循环
如 for i=1 to 3
print
for j=1 to 3
print ***;
next j
next i
不想换行的话在后面加个分号 print ***;

如果打印公函,使用代码输入字符串Printer.Print打印字符串比较难看,而且段落格式和字体十分难看。 你要求的自动到什么含义,和text输入的字符不定在什么地方,什么意思?你屏幕打印?你可以Hi百度或者发送信息给我。

换行方法是字符串需要换行的地方加上VBCRLF字符串,比如 "兹有我公司"; Text5; "等壹同志,到贵处办理"; Text2 & VBCRLF & "相关事宜,望接洽。"

建议VB导入到word或者excel中打印出来,公函会比较漂亮。

也可以使用EXCEL宏实现排版好的段落格式和字体,然后通过宏填充内容再打印。到网上查找下实例,很多。

连接 & vbcrlf

你想在哪个地方换行就把 & vbcrlf & 加在那里,比如:
你想在“相关事宜”这里另起一行,这样写:

Printer.Print "兹有我公司"; Text5; "等壹同志,到贵处办理"; Text2 & VBCRLF & "相关事宜,望接洽。"

你在word里,联合excel,用邮件合并,又快捷,又方便,效果又好。

楼上正解。给50分太浪费了吧。笑

把"& chr(13) &"在冒号后面添上就行了
呵呵!祝你好运~

& chr(13) & chr(10) &