📄 subex.asp
字号:
<HTML><BODY BgColor="#FFFFFF">
<%
NameList = Array("陈桶一", "黄光权", "胡生妙", "王为全", "李日正", "刘德菖", "方正一", "刘康宝", "谢掬花", "王美兰", "徐小当", "叶小毛")
ScoreList = Array(90, 58, 41, 95, 59, 28, 98, 0, 95, 41, 91, 0)
For I = 0 To UBound(NameList)
IsScorePassed NameList(I), ScoreList(I)
Response.Write "<BR>"
Next
%>
</BODY>
</HTML>
<%
Sub IsScorePassed( Name, score )
Response.Write Name & ", "
If score >= 60 Then
Response.Write "你及格了!"
ElseIf score >= 50 Then
Response.Write "你可以补考!"
Else
Response.Write "你不及格呦!"
End If
End Sub
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -