Public Class ConnectSettings
Public Abandoned As Boolean
Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
If String.IsNullOrEmpty(txtODBC.Text) Then
MsgBox("No ODBC source entered")
Return
End If
Abandoned = False
Me.Hide()
End Sub
Private Sub btnCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancel.Click
Abandoned = True
Me.Hide()
End Sub
End Class