- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- picture问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=45674)
-- 发布时间：2014/2/8 15:42:00
-- picture问题
在picturebox中能不能把图片变窄但不影响图片高度
-- 发布时间：2014/2/8 15:46:00
--
代码设置http://www.foxtable.com/help/topics/1852.htm
属性设置
此主题相关图片如下：qq截图20140208154526.png
此主题相关图片如下：qq截图20140208154526.png-- 发布时间：2014/2/8 15:57:00
--
我现在是动态增加picturebox控件我想把图片框的宽度变小，但是不要影响到高度的变化，我设置了你说的这个，没有什么反应
-- 发布时间：2014/2/8 15:57:00
--
图片框的宽度变小? 突然发现我没理解你的意思.
-- 发布时间：2014/2/8 15:58:00
--
你要设置宽度变窄,你原本100 现在设置为50 不就窄了吗?
-- 发布时间：2014/2/8 16:01:00
--
对的因为我的东西在form上面放不下了所以我设定了图片框的width属性，这是我设置的height属性跟图片的height一致，但是图片在打印预览的时候是被同比例缩小了
我不想让高度缩小只是想把宽度缩小
-- 发布时间：2014/2/8 16:03:00
--
那你就按照2楼我提供的方式设置一下图片的排列方式即可啊
e.form.controls("picturebox1").ImageLayout = ImageLayout.Stretch
-- 发布时间：2014/2/8 16:21:00
--
我发一段代码帮我分析一下好不
-- 发布时间：2014/2/8 16:21:00
--
不要发代码了,来回折腾快10楼了.
你直接上例子.1分钟解决.
-- 发布时间：2014/2/8 16:23:00
--
Dim L As Integer=70
Dim L1 As Integer=0
For k2 = 0 To w_l -1
Dim pt As WinForm.picturebox
pt= e.Form.CreateControl("picturebox" & k2, ControlTypeEnum.picturebox)
pt.image=getimage("..\\\\Small_POP\\pop_fonts\\A4\\int_2\\" & w(k2) & "_b.bmp")
pt.width=145
pt.height=450
pt.left=L+L1
pt.Top=261
pt.ImageLayout = ImageLayout.Stretch
pt.SizeMode = ImageSizeMode.StretchImage
pt.Printable=True
e.Form.AddControl(pt)
L1=L1+145
Next
这段代码有报错的地方，希望你帮我看看你告诉我那句应该怎么添加