VB 组合框的内容，按升序排列，能否用代码完成？怎么写代码？
答案:2 悬赏:0 手机版
解决时间 2021-03-10 11:57
- 提问者网友：锁深秋
- 2021-03-09 20:17
VB 组合框的内容，按升序排列，能否用代码完成？怎么写代码？
最佳答案
- 五星知识达人网友：拾荒鲤
- 2021-03-09 20:45
如果是数值的话。 冒泡法排序嘛。。。
Private Sub Command1_Click()
k = Combo1.ListCount - 2
For n = 0 To k
For m = 0 To k - n
If Combo1.List(m) > Combo1.List(m + 1) Then
temp = Combo1.List(m + 1)
Combo1.List(m + 1) = Combo1.List(m)
Combo1.List(m) = temp
End If
Next
Next
End Sub
Private Sub Command1_Click()
k = Combo1.ListCount - 2
For n = 0 To k
For m = 0 To k - n
If Combo1.List(m) > Combo1.List(m + 1) Then
temp = Combo1.List(m + 1)
Combo1.List(m + 1) = Combo1.List(m)
Combo1.List(m) = temp
End If
Next
Next
End Sub
全部回答
- 1楼网友：封刀令
- 2021-03-09 21:39
这一句代码
for i = 0 to listcount - 2
中的
listcount
是什么？
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯