Dim cmd As new SQLCommand
cmd.C
cmd.CommandText ="Se/ect 学校名称,班级,学生姓名,身份证件号,学籍号,户籍地址,家庭住址,联系电话,提请审核,审核锁定,是否建档立卡,留守情况,就餐分类,提请审核,审核锁定,状态,_Identify From {学生信息} where 状态 Like '%在读%'and 班级='" & e.Cookies("bj") & "' and 学校名称='" & e.Cookies("userdw") & "' order by 学校名称,班级,学生姓名"
Dim dt As DataTable = cmd.ExecuteReader(True)
wb.InsertHTML("form1", "<Table border=1 cellspacing=0 style='width:100%;text-align:center;'><tr><td style='text-align:center;font-size: 15pt;strong'>学生姓名</td><td style='text-align:center;font-size: 15pt'>就餐选择</td></tr>")
For Each dr As DataRow In dt.DataRows
wb.insertHtml("form1", "<tr style='height:20px;'><td style='width:20%;font-size:15px' >" & dr("学生姓名") & "</td><td style='width:20%'><select value='" & dr("就餐分类") & "' name='txt1_" & dr("_Identify") & "'><option value ='午餐'>午餐</option><option value ='不在学校就餐'>不在学校就餐</option></Select></td></tr>")
Next
wb.insertHtml("form1", "</Table>")
老师,你好,我想在表格中做个下拉选择,但初始值要显示为之表中已有值,但我这样始终是显示为下拉中的第一项午餐,请问上面怎么改