testitem_vbscript104
testitem104.htm
http://sathaporn.o2blog.com
testitem_vbscript104.htm
Q.1 1*(2+3)^0=?
Q.2 1+(2+3)^0=?
Q.3 ( (1+2)^0)*3=?
Q.4 (1^2)+3=?
Q.5 (1+(2^3))^0.5=?
11:03 26/4/2549
Note
<![CDATA[
---
<SCRIPT language="vbscript">
function calculation1()
dim x(5),sumx
x(1)=document.q1.a1(0).checked
x(2)=document.q2.a2(1).checked
x(3)=document.q3.a3(2).checked
x(4)=document.q4.a4(3).checked
x(5)=document.q5.a5(2).checked
document.write("Ans_sheet"&"<hr>")
document.write("Q.(i)"&","&"Ans(i)"&"<BR>")
sumx=0
for i=1 to 5
sumx=sumx+x(i)
document.write(i&","&x(i)&"<BR>")
next
document.write("sum_ mark_true="&abs(sumx)&"<BR>")
document.write(now()&"<hr>")
End function
</SCRIPT>
---
]]>
Down Load
http://upload.o2blog.com/get.php?120654178420866343,3
Date : 26/03/2008
Time : [ 20:47:01 ] |
