VB中怎么在窗体打印中换行?

显示全部楼层 · 2020-5-1 21:18:19

1、打开VB6.0软件，新建一个标准exe工程；2、在设计界面上新建一个Command控件；3、双击Command1进入代码编辑，输入代码：PrivateSubCommand1_Click()Fori=1To100Printi;'打印输出iPrint'换行方法1PrintvbCrLf'换行方法2NextiEndSub

4、点击运行，可以看到换行的效果；

5、总结，换行的方法有两种：一、直接使用print二、使用打印VbCrLf

千问 · 2020-5-1 21:18:19

1、打开VB6.0软件，新建一个标准exe工程；2、在设计界面上新建一个Command控件；3、双击Command1进入代码编辑，输入代码：PrivateSubCommand1_Click()Fori=1To100Printi;'打印输出iPrint'换行方法1PrintvbCrLf'换行方法2NextiEndSub

4、点击运行，可以看到换行的效果；

5、总结，换行的方法有两种：一、直接使用print二、使用打印VbCrLf

千问 · 2020-5-1 21:18:19

方法1:print a*a & vbCrLf方法2:用text控件,将其multiline属性设置为truescorllbars属性设置为3将print a*a 改成:text1.text=text1.text & a*a & vbcrlf请参考下面的常数定义,选择合适的常数常数等于描述 vbCrLf Chr(13) + Chr(10) 回车符与换行符结合 vbCr Chr(13) 回车符 vbLf Chr(10) 换行符 vbNewLine Chr(13) + Chr(10)平台指定的新行字符；适用于当前平台 vbNullChar Chr(0) 值为 0 的字符 vbNullString 值为 0 的字符串用来调用外部过程；与长度为零的字符串 ("") 不同 vbObjectError -2147221504 用户定义的错误号应当大于该值，例如：Err.Raise Number = vbObjectError + 1000 vbTab Chr(9) Tab 字。 vbBack Chr(8) 退格字符 vbFormFeed Chr(12) 在 Microsoft Windows 中没有作用 vbVerticalTab Chr(11) 在 Microsoft Windows 中没有作用####################################### 如对我的回答有疑问,请到偶的blog留言## 我会尽快回复!互相学习，共同进步
##
## http://hi.baidu.com/privateblog
##
#######################################

千问 · 2020-5-1 21:18:19

Print \