- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- messagebox可以这样（多行）显示吗？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2902)
-- 发布时间：2009/5/24 15:13:00
-- messagebox可以这样（多行）显示吗？
引用：kylin老师的代码：
dim m as integer
dim n as integer
dim gs as string ="aaa2bbbawwwbb22"
Do While gs.length>0
dim gs1 as string =left(gs,1)
m = gs.length
gs= gs.Replace(gs1,"")
n = m-gs.length
output.show(gs1 & n) \' 这里改为messagebox（"...... "，"提示"）能按下图方式显示吗？
Loop
此主题相关图片如下：提示窗口能多行显示？.jpg
[此贴子已经被作者于2009-5-24 15:19:08编辑过]
-- 发布时间：2009/5/24 15:56:00
--
还是来凑热闹吧
dim m as integer
dim n as integer
dim gs as string ="aaa2bbbawwwbb22"
dim s as string
Do While gs.length>0
dim gs1 as string =left(gs,1)
m = gs.length
gs= gs.Replace(gs1,"")
n = m-gs.length
s= s & gs1 & "共有" & cstr(n) & "个" & Chr(13) & Chr(10)
Loop
messagebox.show(s,"提示")
-- 发布时间：2009/5/24 16:08:00
--
谢谢！～ 请教：绿色部分起什么作用？
s= s & gs1 & "共有" & cstr(n) & "个" & Chr(13) & Chr(10)
呵呵。。。。 chr(10)表示换行,chr(13)表示回车 是吗。 cstr(n) 呢？
[此贴子已经被作者于2009-5-24 16:34:04编辑过]
-- 发布时间：2009/5/24 16:54:00
--
CStr
转换为字符串(String)。
chr(10)表示换行,chr(13)表示回车
-- 发布时间：2009/5/24 17:03:00
--
以下是引用yangming在2009-5-24 16:54:00的发言：
CStr
转换为字符串(String)。
chr(10)表示换行,chr(13)表示回车
CStr
转换为字符串(String)。
chr(10)表示换行,chr(13)表示回车
又学了一点～ 谢谢！ 呵呵 还可以这样：：：：：：
此主题相关图片如下：提示窗口能多行显示？-.jpg
[此贴子已经被作者于2009-5-24 17:24:24编辑过]
-- 发布时间：2009/5/24 17:25:00
--
以下是引用mr725在2009-5-24 16:08:00的发言：
谢谢！～ 请教：绿色部分起什么作用？
s= s & gs1 & "共有" & cstr(n) & "个" & Chr(13) & Chr(10)
呵呵。。。。 chr(10)表示换行,chr(13)表示回车 是吗。 cstr(n) 呢？
[此贴子已经被作者于2009-5-24 16:34:04编辑过]
这些都在帮助中有说明，简单的应该要自己查的，养成好习惯比较好，呵呵
[此贴子已经被作者于2009-5-24 17:28:00编辑过]