Dim BmpData As New BitmapData
Dim PixleValue(Stride * Bmp.Height) As Byte
Dim Hanlde As GCHandle = GCHandle.Alloc(PixleValue, GCHandleType.Pinned)
BmpData.Scan0 = Hanlde.AddrOfPinnedObject()
这问题有点笼统,软糖来说说把:
图像处理由System.Drawing命名空间负责.
主要是Bitmap类和Graphics类.
Bitmap表示一个位图,可以是BMP,JPG,PNG等文件.
装载位图
Dim?位图?As?Bitmap?=?Bitmap.FromFile("C:\Image1.PNG")
Graphics表示一张画纸,能够进行绘制操作.
它可以被窗体、控件、位图调用CreateGraphics()方法来创建.
然后调用Graphics.Draw开头的一系列函数来绘制图像和图形,Fill开头的填充图形.
创建画纸并绘制位图
Dim?画纸?As?Graphics?=?Me.CreateGraphics()
可以将上面三行放到Form1_Load中测试,把路径改一下,
还可以把Me改为能在上面绘图的控件的名称.
更多内容请看MSDN的System.Drawing命名空间.
如满意,请采纳,谢谢.
C#
using (img1 = new bitmap(xxx,xxx))
{
}
这样的也无效么?
实现VB.NET操作缩放图像代码如下:DimimgAsImageImage=Image.FromFile
(D:\Image\tstImage.jpg)
''tstImage是原先的图片DimgrfxAsGraphics=Me
.CreateGraphics
grfx.DrawImage(img,0,0,img.Width*
DimimgnewAsNewSystem.Drawing.Bitmap
''新建一个放大的图片
imgnew.Save(D:\Image\tstNewImage.jpg,
System.Drawing.Imaging.ImageFormat.Jpeg)
''保存放大后图片
你可以建一个Form,然后在Form里拖进一个Button,把上面的代码放在Button_Click事件里面源码天空
,执行就行了.
对上面VB.NET操作缩放图像代码的解释:
①要获取Graphics对象只能从某一事件的参数中获取或者使用窗体和控件对象的CreateGraphics方法来获取-----上面代码使用Me.CreateGraphics来引用这个对象.
VB.net与VB不同.
VB.net已经有专门绘图的类.
可以定义笔刷然后用Drawing类中的方法绘制.
Private Sub DrawEllipse()
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
myPen.Dispose()
formGraphics.Dispose()
End Sub
Private Sub DrawRectangle()
以上就是土嘎嘎小编为大家整理的vb.net图形图像处理相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!