Vb6 如何使子系统专门使用来自另一个子系统的全局变量值(在其他子系统中设置不同的值)

Vb6 如何使子系统专门使用来自另一个子系统的全局变量值(在其他子系统中设置不同的值),vb6,Vb6,我有一个全局变量,它的值根据用户的操作不断变化 当我的应用程序输入此子项时,我希望它使用项目中其他特定子项的值 帮忙 在子函数或函数中使用VB6,可以添加带有默认值的可选参数。即: “在BAS模块上” Public gsMyVar As String Public Sub MakeSomething(Optional ByVal pMyVar As String = vbNullString) If pMyVar = vbNullString Then pMyVar =

我有一个全局变量,它的值根据用户的操作不断变化

当我的应用程序输入此子项时,我希望它使用项目中其他特定子项的值

帮忙


在子函数或函数中使用VB6,可以添加带有默认值的可选参数。即:

“在BAS模块上”

Public gsMyVar As String
Public Sub MakeSomething(Optional ByVal pMyVar As String = vbNullString)
    If pMyVar = vbNullString Then
        pMyVar = gsMyVar
    End If
    MsgBox "LOCAL MyVar is now: " & pMyVar
End Sub
“关于FRM模块

Private Sub Command1_Click()
    gsMyVar = "BLA-BLA-BLA"
    MsgBox "Global MyVar is : " & gsMyVar
    MakeSomething "YES"
End Sub

这听起来很矛盾。如果有人可以更改它,您如何保证该值是由特定子项设置的?也许你需要重新思考这个变量的全局性质,或者添加另一个跟踪值来源的变量?@JimMack这是因为当我按下一个按钮时,全局变量会根据需要而改变。但后续操作需要在需要更改之前使用全局变量值。我目前的工作是创建另一个全局变量并使用它,尽管这不是最好的,因为它到处都需要额外的代码行