jlxie2008 发表于 2008-9-1 11:28:34

怎么让msgbox分行显示

怎么让msgbox分行显示。
如：
Dim nowdate,arydate
'获取系统日期
nowdate=date()
arydate=split(nowdate,"-")
MsgBox("当前时间为："&arydate(0)&"年"&arydate(1)&"月"&arydate(2)&"日"&Time)
怎么让日期和时间分行显示？

lingxin5013 发表于 2008-9-1 11:34:29

Dim nowdate,arydate
'获取系统日期
nowdate=date()
arydate=split(nowdate,"-")
MsgBox("当前时间为："&arydate(0)&"年"&arydate(1)&"月"&arydate(2)&"日"&vbnewline&Time)
'运行下自己看效果吧，希望对你有帮助

jlxie2008 发表于 2008-9-1 11:41:24

可以了，谢谢“lingxin5013”

jlxie2008 发表于 2008-9-1 11:53:25

补充一下：（以方便可能用到的时候不出错）

若要在消息中强制换行，可在文本中使用vbCrLf(或vbNewLine)常量，用&加空格与字符隔开。如

Dim nowdate,arydate
'获取系统日期
nowdate=date()
arydate=split(nowdate,"-")
MsgBox("当前日期为："&arydate(0)&"年"&arydate(1)&"月"&arydate(2)&"日" & vbCrLf & "当前时间为："&Time)

'如果强制换行不加后面那个“&”，QTP会报错。

lingxin5013 发表于 2008-9-1 12:01:31

非常感谢ＬＳ　学习了　共同学习　共同提高！

zte_boy 发表于 2008-9-1 12:02:30

回车换行符就可以了，vbCrLf

mayuping0516 发表于 2008-9-3 10:22:59

为什么执行的时候有错误

索引值超出范围
为什么阿:Q
页: [1]
查看完整版本: 怎么让msgbox分行显示