急要答案 VB编程题

[复制链接]
查看11 | 回复5 | 2009-5-8 11:23:40 | 显示全部楼层 |阅读模式
编程计算S=1+2+3+...+n 。 n由键盘输入。
在线等
知道的速度帮忙啊

回复

使用道具 举报

千问 | 2009-5-8 11:23:40 | 显示全部楼层
dim n,sumsum=0n=inputbox("please key ni","a number","0")for i=1 to nsum=sum+inextmsgbox sum...
回复

使用道具 举报

千问 | 2009-5-8 11:23:40 | 显示全部楼层
public sub calcsum()dim stra as stringdim dbl as doubledim llp as longstra=trim(inputbox("请输入N:"))it stra="" then exit subdbl=0for llp=1 to clng(stra)dbl=dbl+llp...
回复

使用道具 举报

千问 | 2009-5-8 11:23:40 | 显示全部楼层
x=input()loop i=1 to xm=m+inextprint m...
回复

使用道具 举报

千问 | 2009-5-8 11:23:40 | 显示全部楼层
dim a,bb=0 w=inputbox("请输入一个数字","提示","10") for a=1 to w b=b+wnext msgbox "Sun:"sum...
回复

使用道具 举报

千问 | 2009-5-8 11:23:40 | 显示全部楼层
上面的已经可以了,不过建议在语法上严格一点,定义变量时,尽量指定变量类型,还有用inputbox输入时,得到的返回值并不是数值型的,虽说VB会自动转换,但还是尽量用类型变换函数转换吧。...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行