combobox显示问题
Dim sqlcon As SqlConnection = New SqlConnection( "server=BJUT-EF1A794184;database=canguan;uid=sa;pwd=lixiran; ")
Dim sqlda As SqlDataAdapter = New SqlDataAdapter( "select * from Stuff ", sqlcon)
Dim DataSet1 As New DataSet
Try
sqlda.Fill(DataSet1, "StuffName ")
DataGrid1.DataSource = DataSet1
DataGrid1.DataMember = "StuffName "

ComboBox1.DataSource = DataSet1
ComboBox1.DisplayMember = "StuffName "
ComboBox1.ValueMember = "StuffName "

MsgBox(ComboBox1.SelectedValue)
Catch Exce As Exception
MsgBox( "数据库连接错误! " + Exce.Message)
Finally
If (sqlcon.State = ConnectionState.Open) Then
'sqlcon.Close()
End If
End Try

用datagrid可以显示，但是combobox却显示不了

[解决办法]
ComboBox1.DataSource = DataSet1.Table(0)
ComboBox1.DisplayMember = "DisplayField "
ComboBox1.ValueMember = "ValueFiled "