<Html><body>--------------------HTML代码开始,BODY开始
<script language="VBS">--------------------脚本开始
Function Cube(a,b)--------------------调用开始,执行函数
Dim I,Sum--------------------定义I,SUM为变量
Sum=0--------------------SUM的值为0
For I=a To b--------------------句式变量I的值为A到B
Sum=Sum+I^2--------------------定义变量SUM的值方程式,注意里面的I的值和上面一样,为A到B
Next--------------------继续
Cube=Sum--------------------CUBE的值为SUM,既CUBE=Sum+I^2
End Function--------------------结束调用,停止执行
Dim x,y,s--------------------定义S,Y,Z为变量
x=Cint(InputBox("请输入一个整数X"))--------------------设置X的输入值
y=Cint(InputBox("请输入一个整数y"))--------------------设置Y的输入值
s=Cube(x,y)--------------------定义方程式,S的值为X,Y的立方
MsgBox"s="& s--------------------提交S的值
</Script>--------------------脚本结束
</body></html>--------------------BODY结束,HTML结束
希望对你有帮助,也欢迎你成为我们团队的粉丝。
。
亚洲云Asiayun怎么样?亚洲云Asiayun好不好?亚洲云成立于2021年,隶属于上海玥悠悠云计算有限公司(Yyyisp),是一家新国人IDC商家,且正规持证IDC/ISP/CDN,商家主要提供数据中心基础服务、互联网业务解决方案,及专属服务器租用、云服务器、云虚拟主机、专属服务器托管、带宽租用等产品和服务。Asiayun提供源自大陆、香港、韩国和美国等地骨干级机房优质资源,包括B...
今天早上相比很多网友和一样收到来自Linode的庆祝18周年的邮件信息。和往年一样,他们会回顾在过去一年中的成绩,以及在未来准备改进的地方。虽然目前Linode商家没有提供以前JP1优化线路的机房,但是人家一直跟随自己的脚步在走,确实在云服务器市场上有自己的立足之地。我们看看过去一年中Linode的成就:第一、承诺投入 100,000 美元来帮助具有社会意识的非营利组织,促进有价值的革新。第二、发...
RAKsmart怎么样?RAKsmart机房即日起开始针对洛杉矶机房的独立服务器进行特别促销活动:低至$76.77/月,最低100Mbps带宽,最高10Gbps带宽,优化线路,不限制流量,具体包括有:常规服务器、站群服务器、10G大带宽服务器、整机机柜托管。活动截止6月30日结束。RAKsmart,美国华人老牌机房,专注于圣何塞服务器,有VPS、独立服务器等。支持PayPal、支付宝付款。点击直达...