我创建了控件数组，如图，比如我要将每一横排的text2+text3+text4结果放在text7中，能不能写一个循环，请教怎么写如果还需要将所有text7里面不为空的值取平均值放在text8中，这个又应该怎么写，谢谢解答
VB怎么让对应的text进行运算并显示
答案:2 悬赏:0 手机版
解决时间 2021-03-14 23:52
- 提问者网友：世勋超人
- 2021-03-14 19:47
最佳答案
- 五星知识达人网友：雪起风沙痕
- 2021-03-14 20:30
dim i as integer
for i = 0 to 5
Text7(i).Text = Val(Text2(i).Text) + Val(Text3(i).Text) + Val(Text4(i).Text)
next i
for i = 0 to 5
Text7(i).Text = Val(Text2(i).Text) + Val(Text3(i).Text) + Val(Text4(i).Text)
next i
全部回答
- 1楼网友：长青诗
- 2021-03-14 22:02
private sub command1_click()
'dim x
dim i, j
'x = val(text1(index)) 'index没有定义，出错
for i = 1 to 6
'各数两两相加，判断是否大于5
for j = i to 7
if val(text(i).text) + val(text(j).text) > 5 then msgbox _
"第" & i & "和" & j & "(" & text(i).text & "+" & text(i).text & _
")的和大于5，输入有误"
next j
next i
end sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯