请永夜的极光帮忙,有关综合应用的问题
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控件时就报出Str参数不可选。。
本来应该是要调出选择框的。