Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共4 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:在 MessageBox 里面如何用 Sendkeys.Send()?

1楼
wcs 发表于:2008/12/18 22:34:00
我的代码是这样的,编译器提示出错:

Result=MessageBox.Show("你将对"&vars("开始日期")&"至"&vars("结束日期")&"的预算凭证进行校验!"&Sendkeys.Send(~)&"对于财务软件中没有的会计凭证,将从本系统中删除,而对这些记录你可能已经登记了预算信息!"&Sendkeys.Send(~)&"确实要进行校验吗?", "提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Question)

我把 Sendkeys.Send(~)  换成 Sendkeys.Send({ENTER})  同样出错

我希望在提示窗口中的文字回行,比较好阅读一点!
2楼
狐狸爸爸 发表于:2008/12/18 22:38:00

字符编码

每一个字符都有一个整数编码,通过函数Asc可以获得指定字符的编码。

例如:

Asc("a") '等于97
Asc(
"你") '等于-15133

通过函数Chr可以获得指定编码的字符。

例如:

Chr(97) '等于"a"
Chr(-
15133) '等于"你"

通过Chr函数,可以让我们在字符串中加入一些不可见的控制字符,例如回车符、换行符、Tab符等等。

下表是常用的、不可见的字符编码表:

字符 编码
回车符 13
换行符 10
Tab符 9

例如在MessageBox显示信息的时候,希望分行显示:

MessageBox.Show("如果你认真学习了,你会觉得" & Chr(13) & Chr(10) & "Visual Basic一点不难!", "提示")

上面的代码通过Chr函数,在显示信息的中间插入回车符和换行符,从而实现了信息换行显示:

3楼
wcs 发表于:2008/12/18 23:21:00

这个和易表的一样,知道了!

4楼
wcs 发表于:2008/12/18 23:32:00

已经解决。

我从今年十一开始断断续续地一边看帮助,一边编写程序。

一个小程序已近完成,看来狐表不太难----如果要求不太苛刻的话。

我是没有什么VB基础的,完全看帮助

SQL有一点点基础,只会几种查询,不会不上网查!

共4 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01953 s, 2 queries.