水晶报表有关问题：该报表不包含表 如何加字段

水晶报表问题：该报表不包含表 怎么加字段
Dim con As New Data.SqlClient.SqlConnection("Data Source=q-base\sqlexpress;Initial Catalog=szrld;Integrated Security=True")
  Dim str As String
  str = "select * from khinfo"
  Dim cmd As New Data.SqlClient.SqlDataAdapter(str, con)
  Dim dt As New Data.DataSet
  con.Open()
  cmd.Fill(dt)
  con.Close()
  Dim ropt As New mycryrep
  ropt.SetDataSource(dt)

运行时最后一名ropt.SetDataSource(dt)出现该报表不包含表错误，在网上查找一下，大部分都说没有加字段，请问一下这字段怎么加？在什么地方加，最好能给个例子

------解决方案--------------------
用ropt.SetDataSource(dt.table(0)) 試試
------解决方案--------------------
数据库专家-->添加报表数据源，然后从右边的字段资源管理器拖入字段即可～

哦，解决了，恭喜～