xgngg 发表于 2004-5-12 21:23:00

向高手求助

我需要textbox1中的数据来决定 “AA”的大小


如 textbox1=1 则 aa=a


textbox1=2 则 aa=a+b


textbox1 =3 则 aa+a+b+c


.........


数据比较长，我想不起好的办法

mccad 发表于 2004-5-12 21:30:00

注意发问时把主题写清楚

mikewolf2k 发表于 2004-5-12 21:33:00

for i=1 to textbox1.text


                       aa=aa+chr(65+i)


next i

雪山飞狐_lzh 发表于 2004-5-12 23:02:00

估计楼主要的不是字符相加吧，请楼主把问题表述清楚，a/b/c到底是什么？

mccad 发表于 2004-5-13 06:50:00

本帖最后由 作者 于 2004-5-13 20:25:37 编辑 <br /><br /> 如果是数值，则定义成数组：



Dim aas(1 to 15) As Double '这里15可以按照实际需要的位数做调整<BR>'这里开始做数组的赋值，如<BR>aas(1)=20 '相当于a<BR>aas(2)=5 '相当于b<BR>'.........<BR>for i=1 to textbox1.text        <BR>                       aa=aa+aas(i)<BR>next i

mikewolf2k 发表于 2004-5-13 20:00:00

"这里15可以按照爸爸需要的位数做调整"?!


老大，你家宝贝看得懂么？
页: [1]
查看完整版本: 向高手求助