Передать значение переменной

Public CmbTxt As String = ComboBox1.Text

Imports System.Net.NetworkInformation
Public Class Form2
    Dim n As Integer
    Public config As Integer
    Private Sub Form2_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub
    Private Sub Timer1_Tick_1(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        Dim Конфигурация As NetworkInterface()
        Конфигурация = NetworkInterface.GetAllNetworkInterfaces()
        While n = 0
            ComboBox1.Items.Add(Конфигурация(n).Name)
            n = n + 1
        End While
    End Sub
End Class

Public Class Form2
    Dim n As Integer
    Public config As Integer
    Public Конфигурация As NetworkInterface() = NetworkInterface.GetAllNetworkInterfaces()
    ' далее по тексту

If ComboBox1.SelectedText = "Конфигурация" Then
   'Ваш код
End If

If ComboBox1.SelectedIndex = 0 Then
   'Ваш код
End If

    Public conn As String
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If ComboBox1.SelectedItem <> "" Then
            conn = ComboBox1.Text
            'открываем форму2
            '<<>>
            Me.Close() 'или Me.Visible = False
        End If
    End Sub

Private Sub ComboBox1_SelectedIndexChanged _
(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles ComboBox1.SelectedIndexChanged
'пусть есть глобальная переменная CmbText
CmbText = ComboBox1.SelectedText
End Sub