vb中listbox如何自动排序

 时间：2024-10-12 07:04:08

1、PrivateSub Command1_Click() '上移Dim N As LongN = List1.ListIndex '记录当前序号if n=-1 then exit sub '加这句，判断是否选择

vb中listbox如何自动排序

3、List1.Selected(N - 1) = True '选中移动后记录ElseMsgBox "已经是最前"EndIfEndSub

vb中listbox如何自动排序

5、List1.AddItem List1.Text, N + 2List1.RemoveItem NList1.Selected(N + 1) = TrueElseMsgBox "已经是最后"EndIfEnd Sub

vb中listbox如何自动排序
  • Windows PowerShell如何更改窗口大小
  • vb.net怎么使用大漠插件
  • 如何设置Excel始终以默认编码保存网页
  • 如何理解Excel VBA的With语句
  • SSD Tweaker如何设置NTFS 8.3名称创建
    • 热门搜索
    通草是什么 天时地利人和是什么意思 缺维生素c的症状 什么是端口 复合维生素片 过生日送什么礼物 似水流年是什么意思 伸展运动 病毒变异是什么意思 日记写什么