Public Class Form2

    Private Sub GunaButton2_Click(sender As Object, e As EventArgs) Handles GunaButton2.Click
        Form3.ShowDialog()
    End Sub

    Private Sub GunaButton1_Click(sender As Object, e As EventArgs) Handles GunaButton1.Click
        Form3.seconnecterserver = 1
        Form3.ShowDialog()
    End Sub
End Class