我想把数据库中某属性值赋给下拉菜单，如何实现，下面的代码有错误，不知道如何该

Question

说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30367: 类“System.Data.DataTable”无法被索引，因为它没有默认属性。源错误: 行 20： dim i,j as integer
行 21： for i=0 to dt.rows.count-1
行 22： selsub.items(i).text=dt("coursesname")
行 23： move next
行 24：  next
 源文件: E:\e-learning\courseware\db.aspx    行: 22 

Answer 1

感谢您使用微软产品。您可以试一下将
selsub.items(i).text=dt("coursesname")
改为
selsub.items(i).text= dt.Rows(i)("coursesname").ToString()- 微软全球技术中心 VB技术支持本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。为了为您创建更好的讨论环境，请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。

Answer 2

selsub是个DropDownList吗？如果是服务器控件，绑定数据上去就行了。
selsub.DataSource = dt.DefaultView
selsub.DataTextField = "coursesname"
selsub.DataBind()

Answer 3

dt = ExecuteQuery(sql);
this.work_arranger.DataSource = dt;
this.work_arranger.DataTextField = "u_truename";
this.work_arranger.DataValueField = "u_truename";
this.work_arranger.DataBind();