Dim datset As New DataSet()
If (Not datset Is Nothing) And (Not datset .Tables(0).Columns(0).ColumnName().Equals("Error", StringComparison.OrdinalIgnoreCase)) Then
combobox.TextField = datset .Tables(0).Columns(1).ColumnName
combobox.ValueField = datset .Tables(0).Columns(0).ColumnName
combobox.DataSource = datset .Tables(0)
combobox.DataBind()
End If