VB 关于向 listbox 的 additem 和 removeitem 的问题
有一列表框已有内容x1,x2,x3,x4如何编写一个命令按钮的Click事件代码，使得单击命令按钮，复制选中的列表框中的内容到列表框底部如何编写一个命令按钮的Click事...
有一列表框已有内容 x1,x2,x3,x4
如何编写一个命令按钮的 Click 事件代码，使得单击命令按钮，复制选中的列表框中的内容到列表框底部
如何编写一个命令按钮的 Click 事件代码，使得单击命令按钮，移除选中的列表框中的内容 展开
如何编写一个命令按钮的 Click 事件代码，使得单击命令按钮，复制选中的列表框中的内容到列表框底部
如何编写一个命令按钮的 Click 事件代码，使得单击命令按钮，移除选中的列表框中的内容 展开
展开全部
List1.AddItem List1.Text '复制
List1.RemoveItem List1.ListIndex '移除
List1.RemoveItem List1.ListIndex '移除
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
威孚半导体技术
2024-08-19 广告
威孚（苏州）半导体技术有限公司是一家专注生产、研发、销售晶圆传输设备整机模块（EFEM/SORTER）及核心零部件的高科技半导体公司。公司核心团队均拥有多年半导体行业从业经验，其中技术团队成员博士、硕士学历占比80%以上，依托丰富的软件底层...
点击进入详情页
本回答由威孚半导体技术提供
展开全部
Private Sub Command1_Click()
Call Form_Load
List1.Height = 1680
Dim mVC
mVC = Int(List1.Height / 240)
For i = List1.ListCount To mVC
List1.AddItem ""
Next
List1.AddItem "x1"
End Sub
Private Sub Command2_Click()
List1.RemoveItem List1.ListIndex
End Sub
Private Sub Form_Load()
List1.Clear
List1.AddItem "x1"
List1.AddItem "x2"
List1.AddItem "x3"
List1.AddItem "x4"
End Sub
Call Form_Load
List1.Height = 1680
Dim mVC
mVC = Int(List1.Height / 240)
For i = List1.ListCount To mVC
List1.AddItem ""
Next
List1.AddItem "x1"
End Sub
Private Sub Command2_Click()
List1.RemoveItem List1.ListIndex
End Sub
Private Sub Form_Load()
List1.Clear
List1.AddItem "x1"
List1.AddItem "x2"
List1.AddItem "x3"
List1.AddItem "x4"
End Sub
追问
这是今天的计算机二级 VB 考试的一个题目
不会这么复杂吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
