共6 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：请教,怎样设计一个动态提示框!
1楼
cpayinyuan 发表于：2009/3/16 14:32:00 例如,在复制数据的时候,出现一个提示框“正在复制……”，告诉用户正在复制数据，等复制完成后，自动关闭这个提示框！
好像messagebox没有这样的功能，不知怎样实现？
2楼
狐狸爸爸 发表于：2009/3/16 15:39:00自己做一个独立窗口，开始的时候显示，结束的时候关闭。
3楼
林中侠 发表于：2009/3/16 16:14:00能不能写一个例子
4楼
狐狸爸爸 发表于：2009/3/16 16:57:00呵呵，其实很简单啊：
Forms("窗口").Open()
原来的代码
Forms("窗口").Close()
5楼
cpayinyuan 发表于：2009/3/16 22:03:00以下是引用狐狸爸爸在2009-3-16 16:57:00的发言：
贺老师，有问题啊。我按你的方法，发现新打开窗口的标签不显示任何内容，不知是哪儿的问题。呵呵，其实很简单啊：
Forms("窗口").Open()
原来的代码
Forms("窗口").Close()
如我做的例子，在窗口1中点按钮，自动打开窗口2，这时候窗口2的标签不显示任何内容！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目5.table |
[此贴子已经被作者于2009-3-16 22:04:32编辑过]
6楼
狐狸爸爸 发表于：2009/3/16 22:10:00呵呵，应该这样：
forms("窗口1").close
forms("窗口2").open
Application.Doevents
dim j as double
for i as double =1 to 1000000000
j=j+i
next
forms("窗口2").close
forms("窗口1").close
forms("窗口2").open
Application.Doevents
dim j as double
for i as double =1 to 1000000000
j=j+i
next
forms("窗口2").close
共6 条记录, 每页显示 10 条, 页签:
[1]