组合框与列表框程序
用vb编写一个含有组合框和列表框的程序,单击组合框的某个数据项,该数据项能显示能列表框内。双击列表框的某个数据项,能将其删除。问题感觉不难,我估计贴出两个窗口后,也就是一...
用vb编写一个含有组合框和列表框的程序,单击组合框的某个数据项,该数据项能显示能列表框内。双击列表框的某个数据项,能将其删除。
问题感觉不难,我估计贴出两个窗口后,也就是一个窗口1、2句语句就行,但刚接触VB ,不会它的具体写法,请您指教!
组合框的Style该选0、1、2的哪个?请给个详细代码吧,谢谢! 展开
问题感觉不难,我估计贴出两个窗口后,也就是一个窗口1、2句语句就行,但刚接触VB ,不会它的具体写法,请您指教!
组合框的Style该选0、1、2的哪个?请给个详细代码吧,谢谢! 展开
2个回答
展开全部
Private Sub Combo1_Click()
'选择Combo中的一项后List中添加该项
List1.AddItem Combo1.Text
End Sub
Private Sub Form_Load()
'在Combo里添加一些数据做测试
For i = 1 To 10
Combo1.AddItem CStr(i)
Next
End Sub
Private Sub List1_DblClick()
'双击List中的一项删除该项
List1.RemoveItem (List1.ListIndex)
End Sub
'选择Combo中的一项后List中添加该项
List1.AddItem Combo1.Text
End Sub
Private Sub Form_Load()
'在Combo里添加一些数据做测试
For i = 1 To 10
Combo1.AddItem CStr(i)
Next
End Sub
Private Sub List1_DblClick()
'双击List中的一项删除该项
List1.RemoveItem (List1.ListIndex)
End Sub
展开全部
Private Sub Combo1_Click()
List1.AddItem Combo1.Text
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 9
Combo1.AddItem "第" & i & "条信息"
Next i
End Sub
Private Sub List1_DblClick()
List1.RemoveItem List1.ListIndex
End Sub
------------------------------------------
组合框的意思就是文本框和下拉菜单的组合
style=0时为组合框,其text属性时可以读写的,就是说你在程序运行起来后可以手动修改其显示的内容。
style=1时为文本框,基本上就和textbox一样了
style=2时为下拉菜单,其text属性为只读,在运行时不可修改,只能显示其列表中的某一项
List1.AddItem Combo1.Text
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 9
Combo1.AddItem "第" & i & "条信息"
Next i
End Sub
Private Sub List1_DblClick()
List1.RemoveItem List1.ListIndex
End Sub
------------------------------------------
组合框的意思就是文本框和下拉菜单的组合
style=0时为组合框,其text属性时可以读写的,就是说你在程序运行起来后可以手动修改其显示的内容。
style=1时为文本框,基本上就和textbox一样了
style=2时为下拉菜单,其text属性为只读,在运行时不可修改,只能显示其列表中的某一项
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询