VB程序功能：单击“产生”按钮，随机产生10个之间的随机整数，显示在列表框1中
VB程序功能：单击“产生”按钮，随机产生10个之间的随机整数，显示在列表框1(List1)中；单击“偶数”按钮将列表框1(List1)中的偶数挑选出来移到在列表框2(List2)中
第1个回答 2014-08-23
(1)
List1.List(i) Mod 2 = 0
(2)
List2.AddItem List1.List(i)
(3)
List1.RemoveItem i
List1.List(i) Mod 2 = 0
(2)
List2.AddItem List1.List(i)
(3)
List1.RemoveItem i
第2个回答 2014-08-23
if val（list1.text） mod 2=0 then
list2.additem list1.text
list1.removeitem list1.listindex
else
i=i+1
end if本回答被提问者采纳
list2.additem list1.text
list1.removeitem list1.listindex
else
i=i+1
end if本回答被提问者采纳
相似回答
