请教VB源码问题，感激不尽~！

来源：百度知道 编辑：UC知道 时间：2024/06/22 11:54:37
我弄了一个combobox下拉菜单，我的要求是：
每在list中选择一项，图片就会相应变换。
但是图片是固定的。
请问如何可以实现呢?

Private Sub Combo1_Click()
If Dir(Combo1.Text) <> "" Then
Picture1.Picture = LoadPicture(Combo1.Text)
Else
End If
End Sub

Private Sub Form_Load()
'将Combo1.Style 设置为 2
Combo1.AddItem "d:\1.jpg"
Combo1.AddItem "d:\2.jpg"
Combo1.AddItem "d:\3.jpg"
End Sub

不知道是不是你要的。

用list的change事件
****。**** = **.**

“图片就会相应变换”、“但是图片是固定的”？
也就是说同一副图片不同效果（黑白、镜像……）？

10分不够

if combobox.text="XXXX" then
XXXXXXXXXXX
end if