|
楼主 |
发表于 2010-4-3 09:37:02
|
显示全部楼层
河北省石家庄市
回复 7# jake20
怎么不行
[e].版本 2
.支持库 xplib
.支持库 shellEx
.程序集 窗口程序集1
.程序集变量 A
.程序集变量 B
.程序集变量 C
.程序集变量 D
.程序集变量 E
.程序集变量 F
.子程序 __启动窗口_创建完毕
XP风格 (1)
A = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F1键)
B = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F6键)
C = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F2键)
D = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F3键)
E = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F4键)
.子程序 _按钮1_被单击
编辑框1.内容 = 到文本 (目录_浏览 (“打开”, 真, , 真, 真))
.子程序 _按钮2_被单击
运行 (编辑框1.内容, 真, )
.子程序 _标签3_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果 (参数一 = A)
选择框1.选中 = 真
.否则
选择框1.选中 = 假
.如果结束
.如果 (参数一 = B)
选择框2.选中 = 真
.否则
选择框3.选中 = 假
.如果结束
.如果 (参数一 = C)
选择框5.选中 = 真
.否则
选择框5.选中 = 假[/e] |
|