วันเสาร์ที่ 13 ตุลาคม พ.ศ. 2550

mycoulombjavascript1

mycoulomb_javascript1


http://www40.brinkster.com/sathapornprom/mycoulombjavascript1.htm


http://www.vcharkarn.com/vblog/32546




    coulomb's law
  • k(N.m2/C2)=9.00e9
  • q1(C)=1.60e-19
  • q2(C)=1.60e-19
  • r(m)=0.53e-10
  • F(N)=k*q1*q2/r2



mycoulombvbscript1

mycoulombvbscript1



http://www40.brinkster.com/sathapornprom/mycoulomb1.htm

http://www.vcharkarn.com/vblog/32546

http://physicsmatayom.blogspot.com


    coulomb's law
  • k(N.m^2/C^2)=9.00e+9
  • q1(C)=1.60e-19
  • q2(C)=1.60e-19
  • r(m)=0.53e-10
  • F(N)=k*q1*q2/r^2






Note_script
<form name="mycoulomb1"><br /><input type="button" name="coulomb1" value="RUN"><br /></form><br /><script language="vbscript"><br />sub coulomb1_Onclick()<br />msgbox"physicsmatayom"&now()<br />dim k, q1,q2,r,f<br />k=9.00e+9<br />q1=inputbox("input q1(C)=","physicsmatayom_coulomb's law","1.60e-19")<br />q2=inputbox("input q2(C)=","physicsmatayom_coulomb's law","1.60e-19")<br />r=inputbox("input r(m)=","physicsmatayom_coulomb's law","0.53e-10")<br />f=k*q1*q2/r^2<br />msgbox"F(N)="&f<br />document.write("physicsmatayom_coulomb's law ; F=k*q1*q2/r^2" &"<br>")<br />document.write("q1(C)="&q1&"<br>")<br />document.write("q2(C)="&q2&"<br>")<br />document.write("r(m)="&r&"<br>")<br />document.write("F(N)="&f&"<br>")<br />end sub<br /></script><br />
End note

วันอังคารที่ 2 ตุลาคม พ.ศ. 2550