下面的是之前写的,你可以参考一下,你说的信息框显示的话可能不行了,做个窗体吧,然后你说的弄个百度.搜索在下面 我没明白你要弄怎么样的,是像百度主页一样的搜索框还是单纯的一个字体!所以暂时先给以下的代码.希望对你有所帮助
版本 2
.支持库 spec
标签1.标题 = “窗口将在10秒后关闭!”
.计次循环首 (10, 次数)
次数 = 次数 - 10
时间 = 取文本右边 (到文本 (次数), 取文本长度 (到文本 (次数)) - 取文本长度 (“-”))
调试输出 (时间)
.如果真 (时间 = “”)
结束 ()
.如果真结束
标签1.标题 = “窗口将在” + 时间 + “秒后关闭!”
延迟 (1000)
.计次循环尾 ()
楼下的请看代码 延迟 (1000) 循环内加入了 延迟 (1000) 所以会按1秒来循环!
实现倒计时弹出信息框并加入百度搜索。
注:倒计时实时无法显示在消息框里面。
提供以下代码:弹出 信息框(“文本”,1,)倒计时10秒,无操作默认返回0
MessageBoxTimeoutA
函数声明:
[DllImport("user32.dll")]
public static extern int MessageBoxTimeoutA(IntPtr hwnd, string txt, string caption, int wtype, int wlange, int dwtimeout);
记得前面引用命名空间:using System.Runtime.InteropServices;
调用的时候:
MessageBoxTimeoutA(this.Handle ,"要关闭哦","提示",64 ,0,3000);
参数值说明:
vbOKOnly 0 只显示 OK 按钮。
VbOKCancel 1 显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。
VbYesNo 4 显示 Yes 及 No 按钮。
VbRetryCancel 5 显示 Retry 及 Cancel 按钮。
VbCritical 16 显示 Critical Message 图标。
VbQuestion 32 显示 Warning Query 图标。
VbExclamation 48 显示 Warning Message 图标。
VbInformation 64 显示 Information Message 图标。
vbDefaultButton1 0 第一个按钮是缺省值。
vbDefaultButton2 256 第二个按钮是缺省值。
vbDefaultButton3 512 第三个按钮是缺省值。
vbDefaultButton4 768 第四个按钮是缺省值。
1 确定+取消
2 终止+重试+忽略
3 是+否+取消
4 是+否
5 重试+取消
6 确定
16 红X+确定
17 红X+确定+取消
18 红X+终止+重试+忽略
19 红X+是+否+取消
20 红X+是+否
21 红X+重试+取消
32 蓝问号+确定
33 蓝问号+确定+取消
34 蓝问号+终止+重试+忽略
35 蓝问号+是+否+取消
36 蓝问号+是+否
37 蓝问号+重试+取消
48 黄叹号+确定
49 黄叹号+确定+取消
50 黄叹号+终止+重试+忽略
51 黄叹号+是+否+取消
52 黄叹号+是+否
53 黄叹号+重试+取消
64 蓝叹号+确定
65 蓝叹号+确定+取消
66 蓝叹号+终止+重试+忽略
67 蓝叹号+是+否+取消
68 蓝叹号+是+否
69 蓝叹号+重试+取消
版本 2
.支持库 spec
标签1.标题 = “窗口将在10秒后关闭!”
.计次循环首 (10, 次数)
次数 = 次数 - 10
时间 = 取文本右边 (到文本 (次数), 取文本长度 (到文本 (次数)) - 取文本长度 (“-”))
调试输出 (时间)
.如果真 (时间 = “”)
结束 ()
.如果真结束
标签1.标题 = “窗口将在” + 时间 + “秒后关闭!”
延迟 (1000)
.计次循环尾 ()
楼下的请看代码 延迟 (1000) 循环内加入了 延迟 (1000) 所以会按1秒来循环!
在时钟下面写代码,
判断。变量=变量-1 如果变量<=0 ,载入 需要弹出的窗口,
至于百度搜索, ,没明白说的是什么,
应该是 个网页吧, 如果是网页,就用 超文本浏览框.
原理 就这样了,.
建一个信息框和时钟
在时钟下输入代码
判断。变量=变量-1 如果变量<=0 ,载入 需要弹出的窗口,
至于百度搜索, ,没明白说的是什么,
应该是 个网页吧, 如果是网页,就用 超文本浏览框.
原理 就这样了,.