Pointers 如何在vbscript中打开窗口对话框后更改变量？

我有两个按钮，第一和第二。如果单击第一个按钮，将打开一个包含文本框的对话框。插入文本框的文本存储在变量

text1

中

---

我的问题是，如果单击第2个按钮，如何将变量

text1

更改为

text2

？（如果单击第二个按钮，它将打开与单击第一个按钮时相同的对话框）

您可以创建一个变量来保存

text1

和

text2

的内容

Dim sText

Sub Button1_Click()
    sText = InputBox("Enter value:", "Button 1", sText)
End Sub

Sub Button2_Click()
    sText = InputBox("Enter value:", "Button 2", sText)
End Sub

为了使其更通用，您可以创建一个子对话框来显示对话框（在本例中，我使用的是）：

---

您可以在本文中阅读有关变量作用域的内容：。这也适用于VBScript。

您能否显示您已经拥有的代码，因为这听起来不像VBScript，但更可能是VBA，虽然类似，但却有着显著的差异。如果您在这里没有任何代码，您可能会有点“跳枪”，很难假设他们正在谈论VBScript。我不建议回答问题，直到OP明确了它想做什么，并且至少显示出某种解决问题的尝试。我同意我没有太多的东西要做，但可变范围可能会在很大程度上帮助我理解问题的要点。对话框本身的实现与变量范围无关。不过，我非常感谢你的评论，而且我做了一些假设，我可能不应该这样做。对于像您这样的勤奋用户，我非常喜欢这些问题和答案。

Dim sText

Sub ShowDialog()
    sText = InputBox("Enter value:", "Button Click", sText)
End Sub

Sub Button1_Click()
    ShowDialog
End Sub

Sub Button2_Click()
    ShowDialog
End Sub