如何从combo列表控件中.顺序变换?
COMBO控件中包含
1
2
3
4
5
6
如何按下一个键后.
1.text控件中.自动变换出
1,2,3,4,5,6,1,2..........
?????????
问题点数：20、回复次数：2Top
1 楼gddd（gddd）回复于 2001-11-17 00:22:08 得分 0
应该很简单的啊？
怎么没人回答啊?难道天冷就没人上来啊?Top
2 楼uguess（天地间，有我在行走！）回复于 2001-11-17 09:57:02 得分 20
private command1_click()
dim i as long,j as long
dim astr as string
j=combo1.listcount-1
for i=0 to j
astr=astr & combo1.list(i)
next
text1.Text = astr '这时显示的是1，2，3，4，5，6 如果想要多重复几遍，就改成： text1.text=astr &astr & astr ...
end subTop
