怎么给Combobox动态赋值[VB.NET]

如何给Combobox动态赋值[VB.NET]
Dim m_SqlCmd As New SqlCommand("select user_typname from user_type", Module_Sql.sqlconn)
  Dim m_SqlAdaper As New SqlDataAdapter(m_SqlCmd)
  Dim m_DataTable As New DataTable
  m_SqlAdaper.Fill(m_DataTable)
  cboUserType.DataSource = m_DataTable

上面是我写的代码，但cboUserType显示出来的值不对，正确的应该怎么写？

[解决办法]
设置字段

comboBox1.DisplayMember = "字段名";
[解决办法]
参考c#的 VB.NEt
comboBox1.DataSource = dataSet.Tables[0];
comboBox1.DisplayMember = "Content"; //显示
comboBox1.ValueMember = "SeqNo"; //值
comboBox1.SelectedIndex = -1;