在vb程序做出两数相加的攻略

直接输入相加,不同进制的转换成一样的进制相加.

privatesubcommand1_click()dimmaxfori=1to3n=val(inputbox("输入第"&i&"个数"))ifn>maxthenmax=nendifnextprint

简单写一下代码流程dima(20)fori=0to19a(i)=inputbox(“输入第"+str(i+1)+"个数")nextisum=0fori=0to19sum=sum+a(i)nexti备注

---同号----两数相加,取相同的符号,并把---绝对值--相加；----异号--两数相加,取--绝对值---较大的数的符号,并用---较大绝对值---减去----较小绝对值---

dimi,j,a,basintegerfori=0to99a=i\10b=imod10ifa*b>a+bthenj=j+1nextprintj再问：a=i\10b=imod10是什么意思？有什么作用？

PrivateSubCommand1_Click()Dim奇数和AsLongDim偶数和AsLongDim你输入的数AsIntegerDimiAsLong你输入的数=InputBox("请输入一个整数

'Text1,Text2,Text3输入'Text4,Text5输出公约数,公倍数PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsInteg

dimxasinteger,dimsumasintegerforx=1to100ifxmod3=0thensum=sum+xendifnextxprintsum

Int和Fix都会删除number的小数部份而返回剩下的整数.Int和Fix的不同之处在于,如果number为负数,则Int返回小于或等于number的第一个负整数,而Fix则会返回大于或等于numb

#includeclassJZ{private:\x09intmatrix1[100][100];\x09intmatrix2[100][100];\x09intaddresult[100][100]

sum=0fori=1to100if(imod3)thensum=sum+inextiprintsum

拜托,这么多输入你就用列表啦,用那么多textbox,你不累我看得都累.还有,你要求的是什么尽量用数学的方式表达出来,有图更好至于你的a5d6的问题,是因为你的是字符串运算而不是数值运算,转换一下类型

functionGetData()dimMaxasdouble'最大的数dimminasdouble‘最小的数dimiLasdouble’最大的位置dimalasdouble‘最小的位置dimtota

和为21则每个数字最小为3最大为9inta,b,c;for(a=3;i

你试试把d=a+c改为,d=Val(a)+Val(c)应该没问题了

dimaasintegerdimbasintegera=3b=5label1.caption=“两数之和为”&(a+b)再问：可不可以只用标签、命令按钮、文本框就表现出来呢？再答：标签label1，命

没搞懂你这个是什么意思,这两条线所表示的单位是一样的吗?你为什么要相加,如果只是求和用SUM函数即可呀再问：是两种液体的流量，在不同的时间内达到不同的流量，想知道在每个时间点的总流量值。再答：是在相同

两种方法1补充你的算法,PrivateSubCommand1_Click()Dima(10)AsInteger,nAsIntegerDimiAsInteger,kAsIntegerRandomizea

舟山娃娃 你不懂就不要乱说话,js有多种计算两个数相加的方法.我这里只是其一.本想偷个懒,把关键的东西提供就行啦,未曾想到有些人看不懂,所以重新把HTML代码加上.我做的是不用弹出窗口,直接

PrivateSubForm_Click()Dimi,min,nClsFori=1To3Randomizen=Int(Rnd*100)+1Printn,Ifi=1Thenmin=nElseIfmin>