[求助]这个代码怎么写~

菜鸟求助~
有个简单的程序,想请教下大家。左边的列表框里是很多图片的名称,右面是一个图像框。我希望程序运行之后,选中列表框的哪几个名称,(点击‘添加’按钮之后)就能在右面的图像框里将对应的那几个图片从相应的文件夹里调出来。请大家帮忙写一下代码,万分感谢!!!
Private Sub Combo1_Click()
If Combo1.Text = 1 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\Administrator\桌面\pic\4-1.bmp")
End If
If Combo1.Text = 2 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\Administrator\桌面\pic\6-1.bmp")
End If
End Sub
[此贴子已经被作者于2006-6-9 20:05:14编辑过]