combobox1里有如下图的两个字段

当我选择“学生”时，怎么样定义共享变量才能使我能够在下图的“返回”按钮的代码中也能使用起初在combobox1.text中选择的”学生“的值


也就是怎么把选择combobox1中的两个值定义为共享变量，在其他的窗体中也能够使用

我在返回按钮中的代码如下，但是if语句不起作用？？？？？？？？？？？？？？
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim from As New 主窗体()
        Dim f As New 赛前处理()
        Dim fom As New 登录验证()
        If = "学生" Then
            from.Button2.Enabled = False
            from.Button3.Enabled = False
            from.Button5.Enabled = False
            from.分组处理ToolStripMenuItem.Enabled = False
            from.赛中处理ToolStripMenuItem.Enabled = False
            from.赛后处理ToolStripMenuItem.Enabled = False
            from.系统维护ToolStripMenuItem.Enabled = False
            f.Button3.Enabled = False
            from.Show()
        ElseIf = "老师"
            from.Show()
        End If
        Me.Hide()

    End Sub

在项目中添加一个模块文件，在其中声明的全局变量等可在各个窗体中使用。