设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 1191|回复: 10
打印 上一主题 下一主题

请问有没有这样的变量?

[复制链接]
跳转到指定楼层
1#
发表于 2002-7-12 21:46:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
常规变量: 用DIM 或 PUBLIC 定义的变量 会被 END 语句重置.
能不能定义一种变量在执行 END 时不会被删除?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2002-7-12 21:53:00 | 只看该作者
请查VBA帮助,变量的使用范围。[em26]
3#
 楼主| 发表于 2002-7-12 22:00:00 | 只看该作者
我正在查.

其实问题是亮样的:
我设定了几个全局变量.
在程序运行过程中需要用到其值,但我在代码中用了一些 END 语句(用作错误处理).但发现在执行 END 后所有全局变量值丢失.
请问用什么办法可以让流程立即跳出但不删除全局变量?

点击这里给我发消息

4#
发表于 2002-7-12 22:04:00 | 只看该作者
请在模块中定义全局变量。[em26]

不要放在过程中,放在最前面。
5#
 楼主| 发表于 2002-7-12 22:05:00 | 只看该作者
我正是这样做的,但 END 会将其删除.

点击这里给我发消息

6#
发表于 2002-7-12 22:30:00 | 只看该作者
你为什么要执行 End 语句?

在VBA中:

End Sub 结束过程
End Function 结束函数

而 End 是结束程序。[em26] 当然所有的变量都全释放。
7#
 楼主| 发表于 2002-7-12 22:43:00 | 只看该作者
假设如下:
    If IsNull(Text_Received) Then
        MsgBox "lease input received quantity", vbOKOnly, "No input"
'        End
    我想让程序从这里跳出
    Else
        ....
8#
 楼主| 发表于 2002-7-13 00:00:00 | 只看该作者
找到方法了!

本来可用 STOP, 但必须编译成 MDE 才能隐藏代码.

后来用 GOTO Over 解决.

在每个用到了此语句的 SUB 中加一句,放在 END SUB 的上面

Over:
'      Do nothing
9#
发表于 2002-7-13 00:33:00 | 只看该作者
亏你想得出来。
跳出过程请用:Exit sub
跳出函数请用:Exit Function

点击这里给我发消息

10#
发表于 2002-7-13 04:50:00 | 只看该作者
呵呵......[em26]
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-29 23:29 , Processed in 0.096381 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表