<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结束
希望对你有帮助,也欢迎你成为我们团队的粉丝。
。
HostYun是一家成立于2008年的VPS主机品牌,原主机分享组织(hostshare.cn),商家以提供低端廉价VPS产品而广为人知,是小成本投入学习练手首选,主要提供基于XEN和KVM架构VPS主机,数据中心包括中国香港、日本、德国、韩国和美国的多个地区,大部分机房为国内直连或者CN2等优质线路。本月商家全场9折优惠码仍然有效,以KVM架构产品为例,优惠后韩国VPS月付13.5元起,日本东京...
georgedatacenter怎么样?georgedatacenter这次其实是两个促销,一是促销一款特价洛杉矶E3-1220 V5独服,性价比其实最高;另外还促销三款特价vps,大家可以根据自己的需要入手。georgedatacenter是一家成立于2019年的美国vps商家,主营美国洛杉矶、芝加哥、达拉斯、新泽西、西雅图机房的VPS、邮件服务器和托管独立服务器业务。georgedatacen...
Virtono最近推出了夏季促销活动,为月付、季付、半年付等提供9折优惠码,年付已直接5折,而且下单后在LET回复订单号还能获得双倍内存,不限制付款周期。这是一家成立于2014年的国外VPS主机商,提供VPS和服务器租用等产品,商家支持PayPal、信用卡、支付宝等国内外付款方式,可选数据中心包括罗马尼亚、美国洛杉矶、达拉斯、迈阿密、英国和德国等。下面列出几款VPS主机配置信息,请留意,下列配置中...