湖南省监狱管理胡勇华:两条VB题目,请各位赐教

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 04:35:55
private sub command1_click()
Dim A (1 to 5) as integer
Dim b as integer
for b = 1to 5
A(b)=b
Next b
Text1.text= A(b-2)
End sub

这题的答案是4
可是我不理解为什么是4,从这里开始就不明白了
A(b)=b
Next b
Text1.text= A(b-2)

可不可以把这个答案的过程写给我呢?拜托各位了!

还有这一题,不知道是不是答案有问题
private sub command1_click()
text1.text=2
text2.text=3
text3.text=text1.text+text2.text
text4.text=Val(text1.text) + Val(text2.text)
End sub

答案是 TEXT3.TEXT=23
Text4.text=5

怎么这样呢?text3 不是应该等于5吗?为什么text4等于5 呢?
嘻嘻嘻,哪位可爱的MM或者GG 肯留下QQ给我呢。。。。我今年要补考VB,希望大家帮帮我了!!!

private sub command1_click()
Dim A (1 to 5) as integer
Dim b as integer
for b = 1to 5 b在这个地方会循环到5
A(b)=b
Next b 在计算next的时候,b就b=b+1=6了!
Text1.text= A(b-2) b-2当然是4了
End sub

text3.text=text1.text+text2.text
text1.text和text2.text是两个字符串!字串加就是连接
所以“2”+“3”=“23”

下面那个val是吧字符串变成数字!
那当然2+3=5了

For ... Next 循环计数器大于其循环的终值才会停止,所以你的循环当计数器B的值大于5,这里你未指定STEP的值,VB缺省认为是步长为1,所以B的终值是6,故结果为4。
text3.text=text1.text + text2.text 此式等值于
text3.text=text1.text & text2.text
这是在前式中文本框的内容作为字符串相加即连接处理的。
text4.text=Val(text1.text) + Val(text2.text)
上式中使用了VAL取值函数,将字符串转为数值,所以结果为5。

第1个不知道怎么写过程。
第2个是因为:
Text3.text他直接写等于text1.text+text2.text 这样写,就是等于,前面的数加上后面的数,这个加的加法是:比如 5+8=58 他是把第1个数和第2个数连起来。
而Text4.text=Val(text1.text) + Val(text2.text)
他用了Val这个代码,意思可以理解成其中的真实数据
所以2+3当然等5!~

以后这样的问题,给点分嘛
我写的都累。。

1、不太理解,我只知道VB的数组是从0开始的,A(0)=1,A(b-2)=A(3)=4

2、text3.text=text1.text+text2.text
相当于:text3.text=text1.text & text2.text(只是数字的合并,而非数学的相加!)