方法1、用txtbox数组
粘贴第一个textbox,之后复制,会提示是否创建控件数组,选是复制22个。区别index不同
例如控件数组名text1,那么text1(0).text,text1(1).text1...就可以 用for了
sum=0
for i=0 to 22
sum=sum+val(text1(i).text)
next
方法2、用控件变量,例如你的text1-text23
sum=0
for i= 1 to 23
mytb = Me.Controls("text" & i)
sum=sum+val(mytb)
next i
[此贴子已经被作者于2018-3-14 16:47编辑过]