说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

设计一个可中断循环的按钮-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
设计一个可中断循环的按钮-VB资料
当 程 序 进 入 循 环 而 尚 未 脱 离 时 , 使 用 者 将 无 法 操 作 表单 上 的 控 制 控 件 , 所 以 按 钮 也 是 无 法 操 作 的 。 想 要 设计 可 中 断 循 环 的 按 钮 , 首 先 必 须 在 循 环 之 中 安 插 DoEvents 叙 述 , 例 如 :
While ...
循 环 内 的 处 理 工 作
DoEvents
Wend
DoEvents 的 作 用 是 暂 时 释 放 CPU, 让 其 他 程 序 得 以 被 执 行, 也 就 是 让 使 用 者 可 以 操 作 表 单 上 的 控 制 控 件 。
接 着 声 明 一 个 全 域 变 数 : Dim bExit As Boolean, 然 后 在 回圈 中 增 加 以 下 的 判 断 式 :
While Not bExit
循 环 内 的 处 理 工 作
DoEvents
Wend
bExit = False
最 后 则 是 在 按 钮 的 Click 事 件 程 序 中 撰 写 以 下 叙 述 :
bExit = True
以 上 程 序 有 两 大 重 点
(1) DoEvents 让 使 用 者 可 以 按 下 命令 钮
(2) 按 钮 按 下 时 , 将 全 域 变 数 bExit 设 定 成 True, 使 得 程 序 在 判 断 Not bExit 为 False 的 情 况下 而 脱 离 循 环 。


限制FORM的大小-Delphi资料 用Delphi开发分隔线组件 用Delphi设计拨动、跳线开关组件 用Delphi 设 计 拨 动、 跳 线 开 关 组 件 用Delphi实现JPEG格式图像的显示 送分问题:到底什么样的PHP程序叫html和PHP代码分开写,有谁给一两个文件作为示例??谁先给出得100分 在水晶报表中如何动态的控制一些字段和label的抑制显示!(请高手不吝赐教!) 代发:沈阳新时空网络公司招聘 谁能告诉我“.hpp”文件是干什么的,解释得越详细越好 插入数据库求解 ■■■请教:我在删除记录时出现以下错误?该怎么解决? 用VB操作EXCEL表,在激活工作薄是提示自动化错误是为什么? 关于表格的小麻烦问题,不知道能不能说清楚。 请问domino6没有domcfg.nsf吗?如果没有如何设置login页? 相对分子质量为86的烷烃.主链为4个碳原子的同分异 相对分子质量为100的烷烃,主链上有5个碳原子的同 相对分子质量为100的烷烃,主链为5个碳原子可能的 主链上含有5个碳原子,分子中共有7个碳原子的烷烃, 碳原子数1-10的烷烃中一氯代物只有一种的烷烃有哪 主链含5个碳原子,有甲基、乙基2个支链的烷烃有几种 烷烃 烯烃 苯 跪求有机物烷烃,烯烃,苯的计算规律 烷烃、烯烃、苯及其化合物中哪些是液体哪些气体? 中央印发通知要求开展“四风”突出问题十八大以来金融体制改革:坚持市场化改新书曝奥巴马曾向幕僚吹嘘:我擅长杀人日空自航空展开幕 蓝色冲击波进行飞行印度北部村落遭武装分子袭击 造成7死相互体谅吧,男人女人都不容易打湿的人生(深度好文)看了这个,你还长期步行吗?经常咬到舌头可能预示什么你知道吗?11月16日【积德改命】毛病少了?运众神之寂无仙落梦世界梦幻屋里的丑丫头万古蛇妖利顺德大饭店旅游虎山长城旅游圣索菲亚大教堂旅游北川地震遗址旅游朱德故里琳琅山景区旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘