VB中怎样用image控件显示存放在文件夹下的路径图片
xingming.Text=rs!姓名&""xingbie.Text=rs!性别&""xueli.Text=rs!学历&""shengri.Text=rs!生日&""zh...
xingming.Text = rs!姓名 & ""
xingbie.Text = rs!性别 & ""
xueli.Text = rs!学历 & ""
shengri.Text = rs!生日 & ""
zhiye.Text = rs!职业 & ""
biye.Text = rs!毕业 & ""
xianzhu.Text = rs!现住 & ""
yuanji.Text = rs!原籍 & ""
QQhao.Text = rs!QQ号 & ""
youxiang.Text = rs!邮箱 & ""
chuanzhen.Text = rs!传真 & ""
dianhua.Text = rs!电话 & ""
guanxi.Text = rs!关系 & ""
问题一
touxiang.Picture = LoadPicture(rs("头像"))
就是上面这句怎样将路径图片添加到touxiang这个image控件中,数据库中的图片路径为img/meinv.jpg这个img文件夹和程序本身在一个文件夹里
不知道应该怎样写请大家帮帮我
问题二
怎样实现将图片以路径形式保存到数据库,并且将所选图片拷贝到img文件夹下。帮帮我吧。
第一个问题已经解决
If rs("头像") <> "" Then
touxiang.Picture = LoadPicture(App.Path & "\" & rs("头像"))
Else
touxiang.Picture = LoadPicture(App.Path & "\img\no_picture.gif")
End If
请大家帮忙看看第二个问题
问题二
怎样实现将图片以路径形式保存到数据库,并且将所选图片拷贝到img文件夹下。帮帮我吧。 展开
xingbie.Text = rs!性别 & ""
xueli.Text = rs!学历 & ""
shengri.Text = rs!生日 & ""
zhiye.Text = rs!职业 & ""
biye.Text = rs!毕业 & ""
xianzhu.Text = rs!现住 & ""
yuanji.Text = rs!原籍 & ""
QQhao.Text = rs!QQ号 & ""
youxiang.Text = rs!邮箱 & ""
chuanzhen.Text = rs!传真 & ""
dianhua.Text = rs!电话 & ""
guanxi.Text = rs!关系 & ""
问题一
touxiang.Picture = LoadPicture(rs("头像"))
就是上面这句怎样将路径图片添加到touxiang这个image控件中,数据库中的图片路径为img/meinv.jpg这个img文件夹和程序本身在一个文件夹里
不知道应该怎样写请大家帮帮我
问题二
怎样实现将图片以路径形式保存到数据库,并且将所选图片拷贝到img文件夹下。帮帮我吧。
第一个问题已经解决
If rs("头像") <> "" Then
touxiang.Picture = LoadPicture(App.Path & "\" & rs("头像"))
Else
touxiang.Picture = LoadPicture(App.Path & "\img\no_picture.gif")
End If
请大家帮忙看看第二个问题
问题二
怎样实现将图片以路径形式保存到数据库,并且将所选图片拷贝到img文件夹下。帮帮我吧。 展开
3个回答
展开全部
app.path & "\img\meinv.jpg"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你需要用CommonDialog控件
CommonDialog1.ShowOpen
rs("头像")=CommonDialog1.FileName
或者
rs("头像")=App.Path & "\img\no_picture.gif"
rs.UpdateBatch
CommonDialog1.ShowOpen
rs("头像")=CommonDialog1.FileName
或者
rs("头像")=App.Path & "\img\no_picture.gif"
rs.UpdateBatch
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询