Foxtable(狐表)用户栏目专家坐堂 → messagebox可以这样(多行)显示吗?


  共有19288人关注过本帖树形打印复制链接

主题:messagebox可以这样(多行)显示吗?

帅哥哟,离线,有人找我吗?
mr725
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
messagebox可以这样(多行)显示吗?  发帖心情 Post By:2009/5/24 15:13:00 [显示全部帖子]

引用: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/5/24 17:03:00 [显示全部帖子]

以下是引用yangming在2009-5-24 16:54:00的发言:
CStr
转换为字符串(String)。

chr(10)表示换行,chr(13)表示回车

又学了一点~  谢谢!  呵呵 还可以这样::::::


此主题相关图片如下:提示窗口能多行显示?-.jpg
按此在新窗口浏览图片
[此贴子已经被作者于2009-5-24 17:24:24编辑过]

 回到顶部