主题：帮忙修改一下代码

cmd.commandtext="select 姓名,姓别,年龄 from {会员表} where 会员编号='" & e.form.controls("会员编号").text & "'"

dim dt as datatable=cmd.ExecuteReader()

if dt.datarows.count=1

dim dr as datarow=dt.datarows(0)

e.form.controls("姓名").text=dr("姓名")

end if

dim cmd as new sqlcommand