Private Sub ShowOptionsForm() Dim options = New frmOptions ' Did the user click Save? If options.ShowDialog() = Windows.Forms.DialogResult.OK Then ' Yes, so grab the values you want from the dialog here Dim textBoxValue As String = options.txtMyTextValue.Text End If
End Sub
'Now inside of your dialog form, you need to set the result Windows.Forms.DialogResult.OK
'when the user clicks the button that corresponds to the OK action of the dialog form, like this:
Public Class frmOptions Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click ' Set the result to pass back to the form that called this dialog Me.DialogResult = Windows.Forms.DialogResult.OK End Sub
End Class