Foxtable(狐表)用户栏目专家坐堂 → 图片缩放


  共有2361人关注过本帖平板打印复制链接

主题:图片缩放

帅哥哟,离线,有人找我吗?
ljh29206
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1361 积分:12049 威望:0 精华:0 注册:2012/3/5 11:32:00
图片缩放  发帖心情 Post By:2014/12/1 12:06:00 [只看该作者]

Dim cb As WinForm.ComboBox = e.Form.Controls("ComboBox1")

Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1")


Dim dr As DataRow = DataTables("管理者").find("人名 = '" & cb.text & "'")
If dr IsNot Nothing Then
pbx.Image = GetImage(dr("照片"))
’pbx.ImageLayout = ImageLayout.Zoom

End If

 

 

我想在窗口上添加一个图片     希望能够根据 图片容器的比例 刚好放下去,  不知道 该如何调整代码 ,还是需要修改图片的容器?


 回到顶部