1

我正在制作一个儿童数学程序，我的想法是设置一个全局变量，一旦孩子经历并了解了每种表格上的内容，我将设置一个变量，例如教师 = true。在设置好并且孩子返回主页后，隐藏部分将变得可见我不确定如何使该部分可见，我不确定是否是因为我没有使用正确的方法这样做或没有正确声明全局变量

目前对于我刚刚放入的全局变量

Public Teacher As Boolean

在我的主页顶部

我不知道我应该在主页上的哪个位置打开它以检查变量以查看它是真还是假，然后执行我希望它执行的代码。

这是我目前拥有的

Private Sub Mainpage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If Teacher = True Then
        aboutpage.Visible = True
    Else
        aboutpage.Visible = False
    End If
End Sub

这是用于加载主页，但如果教师 = true 则不显示关于页面

这是我将老师更改为真或假的方法

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Me.Close()
    Enabled11.Show()
    Mainpage.Show()
    Teacher = True
End Sub

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
    Me.Close()
    Teacher = False
    Mainpage.Show()
End Sub

我有一种感觉这是变量，但我不确定我做错了什么这里是否有人有即时消息的联系方式可以帮助我解决这个问题？

4

1 回答 1

0

这几乎是您可以做到的，唯一的问题是该Load事件只会在您第一次打开表单的特定实例时触发。尝试使用该Activate事件或尝试以下操作：

在您的表单中添加一个公共成员Mainpage（可能包括错误，几年没有写过 VB.net）：

Public Sub ToggleTeacher(toggle as Boolean)
    aboutpage.Visible = toggle
End Sub

在您的其他形式中，您只需调用此 sub 而不是修改Teacher：

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Me.Close()
    Enabled11.Show()
    Mainpage.ToggleTeacher(True);
    Mainpage.Show()
End Sub

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
    Me.Close()
    Mainpage.ToggleTeacher(False);
    Mainpage.Show()
End Sub
于 2013-07-16T09:51:14.133 回答