Dim gsmc as string
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
If lst.SelectedIndex > 0 Then gsmc = lst.SelectedValue
End Ifdim r as row = tables(xxx).addnew
r("gsmc") = gsmc