新建文件夹.rar
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
</HEAD>
<BODY>
<link rel="stylesheet" type="text/css" href="css.css">
<h2><center>RC 震荡频率计算<center></h2>
<table width="90%" align="center" cellspacing="1" cellpadding="0" bgcolor="#FFFFFF" class="tborder" border="1">
<tr>
<th align="center">电 容</th>
<th width="39%" align="center">电 阻</th>
<th width="9%" align="center">Q 值</th>
<th width="13%" align="center">频 率</th>
</tr>
<tr>
<td width="39%" height="37" align="left" ><input type="text" name="Dr"><span><select name="Drdw_list" >
<option value="1" >F</option>
<option value="2">uF</option>
<option value="3">nF</option>
<option value="4">pF</option>
</select></span></td>
<td width="39%" align="left" height="37" ><input type="text" name="Dz"><span>
<select name="Dzdw_list">
<option value="1">Ohms</option>
<option value="2">KOhms</option>
<option value="3">MOhms</option>
</select></span>
<td width="40%" align="center"><input type="text"value="<%=Q%>" onMouseDown=""></td>
<%
select case Drdw_list
case 1
Drdw=1
case 2
Drdw=1*10^(-3)
case 3
Drdw=1*10^(-6)
case 4
Drdw=1*10^(-12)
end select
select case Dzdw_list
case 1
Dzdw=1
case 2
Dzdw=1*10^(3)
case 3
Dzdw=1*10^(6)
end select
Q=2*3.1415926*Dr*Drdw*Dz*Dzdw
F=1/2*31415926*sqr(Dr*Drdw*Dz*Dzdw)
end if
%>
<td width="40%" align="center" ><input type="text" name="pinlv" value="<%=F%>"></td>
</table>
</BODY>
</HTML>
[ 本帖最后由 jingjing316 于 2009-10-26 16:33 编辑 ]
