»' Display the form and
change the type
»Dim frm As New Lab3_4_Form(dictFamilyToSymbols)
»If
frm.ShowDialog = Windows.Forms.DialogResult.OK Then
» Try
» inst.Symbol =
frm.cmbType.SelectedItem
» MsgBox("Successfully changed
Family:Type to " _
»
&
frm.cmbFamily.Text & " : " & frm.cmbType.Text)
» Catch
» End
Try
»End If
»