以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 怎么插入图片 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128946) |
-- 作者:521022 -- 发布时间:2018/12/18 20:55:00 -- 怎么插入图片 在设计窗口时,我设计了一个图片框 。 要求实现:单击图片框窗口,可以弹出一对话框,选择电脑里的一张图片插入,然后图片框自动缩放图片至适合框的大小。 请问要如何实现呢?
|
-- 作者:有点蓝 -- 发布时间:2018/12/18 21:24:00 -- 图片框click事件 Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 e.Sender.ImageFile = dlg.FileName End If |