combobox显示有关问题

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 "