高校问答古钱天启通宝值多少钱:关于VB的一个小问题
来源：百度文库 编辑：高校问答 时间：2024/05/06 08:31:31
计算1+2+3+n，n的值从表单中的文本框输入，结果通过MSGBOX显示。
AAA=JIECHENG(TEXTBOX1.TEXT)
MSGBOX AAA
FUNCTION JIECHENG(N)
E=1
FOR I = 1 TO N
E=E*I
NEXT
JIECHENG=E
END FUNCTION
sub command1_click()
a=text1.caption
b=trm(a)(这个函数我忘记了，查查资料吧！就是把字符串转换成数字的函数。
s=0
for i =0 to b
s=S+1
next b
msgbox "这些数字之和为："+STR（S）（把数字转换成字符串，用连接的方式在连接显示在MSGBOX，MSGBOX不支持数字变量）