如何在Excel VBA中定义一个在窗体控件和模块中均能使用的变量?

在模块中有一段程序,结构如下:-----------------------------------Sub排列程序()代码........A:代码........是否循环... 在模块中有一段程序,结构如下:
-----------------------------------
Sub 排列程序()
代码
........
A:
代码
........
是否循环排列窗体.Show
If x = "yes" Then
GoTo A
End If
.......
代码
.......
End Sub
-----------------------------------

"是否循环排列窗体"上有2个按钮,yes和no,代码如下:
----------------------------------
Private Sub yesButton_Click()
x = "yes"
是否循环排列窗体.hide
End Sub
Private Sub noyesButton_Click()
x = "no"
是否循环排列窗体.hide
End Sub
-------------------------------------
x声明为全局变量,在窗体和模块中均声明了Public x As String
测试的时候,框体中的x的值无法在模块中体现,请问应该如何解决啊?谢谢
展开
 我来答
帐号已注销
2019-07-22 · 超过14用户采纳过TA的回答
知道答主
回答量:194
采纳率:22%
帮助的人:20万
展开全部
x声明为全局变量,在模块中声明了Public x As String就好了
追问
明白,谢谢。还有个问题想请教一下,程序运行到中途弹出框体后,我想在不点击窗体按钮的情况下,先上下拖动工作表查看中间成果,中间成果不满意点yes重新执行,满意则点no继续往下执行。目前弹出窗体后,我没法移动工作表,请问该如何修改啊?谢谢 。我尝试改为是否循环排列窗体.Show 0,结果弹出窗体后程序会一直执行到结束,不能达到目的。
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式