Question

我刚刚开始使用Visual Basic .Net。

我似乎无法确定button.text等按钮属性的范围。它们可以在button_click事件子项之外使用吗？如果是这样，怎么样？

如何在满足特定条件时实时修改模块中的按钮属性？

如果可能的话，我肯定会欣赏一些指导和示例。感谢。

Answer 1

您可以将对按钮的引用传递给模块中的子，然后从表单中调用该子。

即

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        ChangeButtonText(Me.Button1, "Changed")

    End Sub

End Class

Module modButton

    Public Sub ChangeButtonText(ByRef Button As Button, ByVal Text As String)

        Button.Text = Text

    End Sub

End Module

Answer 2

同样快速的样本，我不建议做这样的事情

我有两个表单，Form2和Form3。每个表单上都有一个按钮。

我还有Module，名为 MyModule

Public Class Form2

    Public Sub ChangeButtonText(ByVal s As String)

        Button1.Text = s

    End Sub

End Class

Public Module MyModule

    Sub ChangeForm2Btn()
        Form2.ChangeButtonText("LOL")
    End Sub

End Module

从我的Form3中单击按钮并调用模块功能以更改Form2按钮的文本

Public Class Form3

    Private Sub Form3_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Form2.Show()
    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        MyModule.ChangeForm2Btn()
    End Sub

End Class

从模块编辑按钮属性

2 个答案: