大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
'先建立一个bitmap对象,指向图像文件
创新互联从2013年创立,是专业互联网技术服务公司,拥有项目成都做网站、网站建设、外贸营销网站建设网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元乌兰察布做网站,已为上家服务,为乌兰察布各地企业和个人服务,联系电话:13518219792
Dim pic As Bitmap = New Bitmap("e:\1.jpg")
'定义一个图片框的graphics对象
Dim g As Graphics = PictureBox1.CreateGraphics()
'在图片框上绘图
g.DrawImage(pic, 0, 0, pic.Width, pic.Height)
'释放bitmap对象
pic.Dispose()
'现在即可对文件进行操作
你是要把图像缩小以适应picturebox?
PictureBox1.Image = New Bitmap(PictureBox1.Width, PictureBox1.Height)
Dim g As Graphics = Graphics.FromImage(picView.Image)
g.DrawImage(Clipboard.GetImage(), 0, 0, PictureBox1.Width, PictureBox1.Height)
g.Dispose()
会用VBA吗,先在word里面插入图片录制宏,然后将录制的VBA代码修改成.net代码就可以了