txtD.Text = testdr("D").ToString
txtanswer.Text = testdr("answer").ToString
If testdr("type").ToString = "单选题" Then
type.Items(0).Selected = True
Else
If testdr("type").ToString = "多选题" Then
type.Items(1).Selected = True
Else
type.Items(2).Selected = True
End If
End If
End If
objcomd.Connection.Close()
End If
//使用Request对象的QueryString属性来获取deltest参数的值
deltest = Request.QueryString("deltest")
If deltest <> "" Then
comdstr = "delete from question where id=" & deltest
objcomd = New SqlCommand(comdstr, conn)
objcomd.Connection.Open()
objcomd.ExecuteNonQuery()
objcomd.Connection.Close()
Response.Redirect("manexampage/?")
End If
4.6 成绩管理页面的实现
该页面主要是对学生考试成绩的管理，结合了学生信息表和成绩表的双表查询，用一个DataGrid控件显示学生考试成绩，只能对学生成绩进行删除操作，设计比较简单，如图4-6所示：
图4-6 成绩管理页面
主要代码解释：
//使用DataGrid控件的MyDataGrid_Delete事件，利用strSql字符串实现记录的删除
strSql = "Delete from score Where id=" & s_datagrid.DataKeys(CInt(E.Item.ItemIndex))
参考文献
[1]李万伦，何蕾，赵海.ASP.NET程序设计.清华大学出版社，2002