Question

为什么我在vb2015中用不了paintpicture？

系统总是说“不是system.drawing.image的成员”，要怎么办才能用它。

Answer 1

使用vb.net之前还是要翻翻这方面的基础教材的，与vb6在体系上大不相同了。
绘图方法都集中在Graphic对象中，窗体没paintpicture方法，Graphic中drawimage绘图。窗体也没有自动重绘功能，随时都要刷新界面，所以要在Paint 事件中绘图，绘图对象在e中。

追问

您能不能告诉我graphic有哪些方法可以用于截图吗？我增加悬赏，谢谢

追答

graphic中没有，下面是通过拷贝屏幕方法把图片框区域拷贝到文件中，再从位图中拷贝一部分到另一文件中。另外可视控件还有个Drawtobitmap方法可心把界面图像拷贝下来，不过覆盖在该控件上面的控件的内容似乎不能。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim img As New Bitmap(PictureBox1.ClientSize.Width, PictureBox1.ClientSize.Height)
Dim sP As Point = PictureBox1.PointToScreen(New Point(0, 0))
Graphics.FromImage(img).CopyFromScreen(sP, New Point(0, 0), PictureBox1.ClientSize)
img.Save("c:\img.jpg", Imaging.ImageFormat.Jpeg)

Dim img2 As Bitmap = img.Clone(New Rectangle(0, 0, 40, 40), Imaging.PixelFormat.Format24bppRgb)
img2.Save("c:\img2.jpg", Imaging.ImageFormat.Jpeg)
End Sub

追问

谢谢，我还想请教您最后一个问题：如何编写一个裁剪图片的程序？我会继续增加悬赏的，谢谢

追答

太笼统了，界面怎么操作，说的具体一点。

追问

就是输入一张图片（OpenFileDialog控件），按button后，自动平均截成9部分，9张图片全部显示在9个picturebox上，谢谢。

追答

我用的是2008，不清楚是否一样
1.目前只发现image.clone有这个功能，另外还有个com组件PictureClip 功能较大，需要额外引用，点击项目/引用菜单，对话框中选择com页面，找Microsoft PictureClip Control。
2.同时在.Net页面引用Microsoft.VisualBasic.Compatibility，这个组件里有Image对象转换为IPicture的函数，PictureClip只接收IPicture对象，这是以前vb6.0的对象。
没说完，你给我个邮件地址，这里字数受到限止，附件又上传不上。