vb题,实行下列程序,单击命令按钮command1后,文本框的内容为(),列表框最后一项内容为()
privatesubcommand1-click()dimiasinteger,sumasintegerfori=1to10list1.additeminextlist1...
private sub command1-click()
dim i as integer,sum as integer
for i=1 to 10
list1.additem i
next
list1.list(i-1)=100
text1.text=list1.listcount
sum=0
for i =0 to list1.listcount-1
sum=sum+list1.list(i)
next
list1.additem sum
end sub
第一个11,第二个155,要详细过程 展开
dim i as integer,sum as integer
for i=1 to 10
list1.additem i
next
list1.list(i-1)=100
text1.text=list1.listcount
sum=0
for i =0 to list1.listcount-1
sum=sum+list1.list(i)
next
list1.additem sum
end sub
第一个11,第二个155,要详细过程 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询