vb点虐 如何将绘制的图保存为png图片

Dim bitmap1 As New Bitmap("D:\image\0183.jpg")‘panel1.backgroundimage

为庆城等地区用户提供了全套网页设计制作服务，及庆城网站建设行业解决方案。主营业务为成都网站制作、成都做网站、庆城网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！

Dim bitmap2 As New Bitmap(294, 294)’保存图，也就是绘制的大小。

Dim rect1 As New Rectangle(New Point, bitmap2.Size)‘昨天的问题，这里似乎写错了，当然也不算错，只是把新图（小图）扩展成原图大小（大图），这里改正为新图的原大小。

Dim rect2 As New Rectangle(New Point(6, 6), bitmap2.Size)

Dim g As Graphics = Graphics.FromImage(bitmap2)

e.Graphics.DrawImage(bitmap1, rect1, rect2, GraphicsUnit.Pixel)

g.DrawImage(bitmap1, rect1, rect2, GraphicsUnit.Pixel)

bitmap2.Save("d:\a.png", Drawing.Imaging.ImageFormat.Png)

VB点虐 里窗体背景设置为gif 格式图片后，图片不动怎么办？

其实方法是去解析GIF文件，如果楼主觉得麻烦，可以到网上去下个别人做好了的GIF控件（类）。

请问VB点虐 下如何使用winsock udp协议发送图片 和接收图片并存为jpg格式

winsock 发送图片，就是发送文件嘛。

不过UDP协议每次最多只能发送8K，所以你要先读取文件，建立以个byte（）数组 然后第一次发送是从数组的0-8100这个范围，下次再发送的时候将再从8101开始发送，长度仍未8100就可以了。用一个while 循环来判断文件有没有发送完成就行了。对于接收端，在接收的时候也是要用一个循环来写文件，前提是你必须先把要发送的文件的长度告诉接收端。说的够详细了吧！

vb点虐 如何将JPG文件缩放至不大于指定的字节数

1.我有个思路可以尝试一下：把一张字节数在280-300K的图片用PS打开看看像素大小；

2.定义一个新的位图，指定像素大小为上面得到的数据；

3.读取你需要修改大小的JPG文件，然后按指定大小复制到上面新建的位图，并保存为JPG格式