以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  图片缩放  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60787)
--  作者：ljh29206
--  发布时间：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

 

 

我想在窗口上添加一个图片     希望能够根据 图片容器的比例 刚好放下去，  不知道 该如何调整代码 ，还是需要修改图片的容器？
--  作者：Bin
--  发布时间：2014/12/1 14:06:00
--  
代码没问题啊.
--  作者：有点甜
--  发布时间：2014/12/1 14:09:00
--  
pbx.basecontrol.BackgroundImageLayout = ImageLayout.Zoom