multiuc.ascx

利用简单框架结构vb+asp+sql,实现小型考试系统

<%@ Control Language="vb" AutoEventWireup="false" Codebehind="MultiUC.ascx.vb" Inherits="Exam.MultiUC" TargetSchema="http://schemas.microsoft.com/intellisense/ie5" %>
	<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<TABLE id="AutoNumber3" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0"
	width="100%" border="0">
	<TR>
		<TD width="100%" height="25"><SPAN class="STYLE1"><FONT color="#000080">二、多项选择题(每题<%=vMulti%>
					分,共
					<%=vMultiNumber%>
					题。每题至少有1项正确的答案，少选、多选、错选均不得分)</FONT></SPAN></TD>
	</TR>
</TABLE>
<%for k2=1 to vMultiNumber%>
<%DataBingToRep2()%>
<TABLE id="AutoNumber2" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0"
	width="100%" border="0">
	<TR>
		<TD width="100%" bgColor="#efefef" height="20">&nbsp;&nbsp;<B><%=i2+1%>
				、<%=qname2%>
				<asp:Label id="lblQesName" runat="server"></asp:Label></B></TD>
	</TR>
	<TR>
		<TD width="100%">&nbsp;&nbsp;&nbsp;&nbsp; <INPUT type="checkbox" value="A"  name="no2<%=qid2%>">
			A、<%=qa2%></TD>
	</TR>
	<TR>
		<TD width="100%">&nbsp;&nbsp;&nbsp;&nbsp; <INPUT type="checkbox" value="B" name="no2<%=qid2%>">
			B、<%=qb2%></TD>
	</TR>
	<TR>
		<TD width="100%">&nbsp;&nbsp;&nbsp;&nbsp; <INPUT type="checkbox" value="C" name="no2<%=qid2%>">
			C、<%=qc2%></TD>
	</TR>
	<TR>
		<TD width="100%">&nbsp;&nbsp;&nbsp;&nbsp; <INPUT type="checkbox" value="D" name="no2<%=qid2%>">
			D、<%=qd2%></TD>
	</TR>
</TABLE>
<%i2=i2+1%>
<%next k2%>
<TABLE id="Table1" align="center">
	<TR>
		<TD>
			<asp:hyperlink id="lblFirst" runat="server" Font-Size="12px" ForeColor="IndianRed">第一页</asp:hyperlink>
			<asp:hyperlink id="lblPrev" runat="server" Font-Size="12px" ForeColor="IndianRed">上一页</asp:hyperlink>
			<asp:label id="lblCurrentPage" Font-Size="12px" ForeColor="IndianRed" Runat="Server"></asp:label>
			<asp:hyperlink id="lblNext" runat="server" Font-Size="12px" ForeColor="IndianRed"> 下一页</asp:hyperlink>
			<asp:hyperlink id="lblLast" runat="server" Font-Size="12px" ForeColor="IndianRed">最后一页</asp:hyperlink></TD>
	</TR>
</TABLE>