Private Sub Form_Load()
Combo1.AddItem "大专"
Combo1.AddItem "本科"
Combo1.AddItem "硕研究生"
Combo1.AddItem "博士研究生"
Combo2.AddItem "无"
Combo2.AddItem "学士"
Combo2.AddItem "硕"
Combo2.AddItem "博士"
End Sub

Private Sub Image1_Click()

Str =
Right = Right(Str, 3)
If Right <> "jpg" Then
mgbox "你选的不是图片"
Else
Image.Stretch = ture
Image1.Picture = LoadPicture(Str)
End If
End Sub


当我选中单击image控件时就报出参数不可选。。
本来应该是要调出选择框的。

不是的。新手就是这样的，对很多代码和参数不了解，犯错多。我晓的RIGHT是函数。我打错了right的。还有msgbox 都打错了。 恩。。我会的。

我错了。我学习很多。。。 谢谢指出。我会加油。。。

出错是有出错行的。。。什么意思呢？
呵呵。。可能是因为太累了吧。。自己也是刚学。难免会有出错的时候。。希望以后多多照顾。。。

multiple1902  可否告诉下我，你的QQ是多少？
我想加你。 以后有什么不懂。我好直接问你咯。

不好意思。。。是因为开头那个问题有两段不同的代码,一:是有错误的地方 二:是我自己修过的地方,就是错误百出的地方.但是那不是我本意,我脑子是清楚要打哪个几个字母.可是打的太快,没有注意,也是自己太大意.不好意思两位楼主.以后我会注意的.
1:理性分析
2：认真读写
3：不懂的地方自己通过以上两种方法思考，在不懂就问你们了（呵呵）
谢谢。以后也同时会注意发贴的问题的。呵呵。