VB中combobox的list里怎么关联文件啊？

来源：百度知道 编辑：UC知道 时间：2024/05/20 07:35:34
比如我在我的img文件夹中有1.jpg 2.jpg 3.jpg 三张图片。combobox的list下拉列表中的1，2，3怎么关联到这3张图片？使我在点列表的1，2，3时可以换窗体中的图片？ 我是把图片设为窗体的背景 就是想点列表时可以变换背景图案
这位大哥。我用了你写的代码。 可是提示 错误啊。 文件1.jpg未找到啊。
还有我看你写的这段代码为什么没有定位 图片所在位置呢？

Private Sub Combo1_Click()
Me.Picture = LoadPicture(Combo1.List(Combo1.ListIndex) & ".jpg")
End Sub

Private Sub Form_Load()
Combo1.AddItem 1, 0
Combo1.AddItem 2, 1
Combo1.AddItem 3, 2

End Sub

我不知道你具体的图片文件的路径,
img文件夹若和你的vbp文件在同一目录下:
这样改:
Private Sub Combo1_Click()
Me.Picture = LoadPicture(app.path & "\img\" & Combo1.List(Combo1.ListIndex) & ".jpg")
End Sub

app.path 是你的程序所在的路径,这里:
app.path & "\img\" 应换成你的IMG文件夹所在的路径