📄 grade.html
字号:
<Html>
<Head>
<Title>学期成绩计算表</Title>
<Script Language="VBScript">
<!--
Sub Cal_Onclick
Result.Tatal.Value=Cint(Result.Grade1.Value) _
* Cdbl(Result.Grade1Rate.Value) _
+Cint(Result.Grade2.value) * cdbl(Result.Grade2Rate.value) _
+cint(Result.Grade3.value) * cdbl(Result.Grade3Rate.value)
End Sub
-->
</Script>
</Head>
<Body>
<Center>
<H1>
<B><Font color="blue">学期成绩计算表</Font></B></H1>
<Form method="post" name="result">
<P>
平时成绩:
<input type="text" name="Grade1" size="20">
平时成绩所占比例:
<Input type="text" name="Grade1Rate" value="0.2" size="5"> <Br>
期中成绩:
<input type="text" name="Grade2" size="20">
期中成绩所占比例:
<Input type="text" name="Grade2Rate" value="0.3" size="5"> <Br>
期末成绩:
<Input type="text" name="Grade3" size="20">
期末考绩所占比例:
<Input type="text" name="Grade3Rate" value="0.5" size="5">
<Div align="Center"><P>
<Input type="Button" value="计算您的成绩" name="cal">
<Input type="Reset" value="重新输入" name="reset">
</Div>
<P><Div align="Center">
恭喜您!您的学期成绩是
<Input type="text" name="tatal" size="16">
</Div>
</Form>
</Center>
</Body>
</Html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -