我用vb.net做好一个程序,其窗体界面如上图.我想把这个窗体界面打印,效果要像这张图片.怎么写打印程序.

[此贴子已经被作者于2007-5-31 19:28:41编辑过]

我也很想知道....

希望高手多多帮忙啊

可能没有人。
我也很想知道！

我也来顶一下
我试了下
但是不行
估计是窗口的设备场景没找对
把代码给你,试出来后告诉我一声,谢谢
Private Declare Function GetDC Lib "user32" Alias "GetDC" (ByVal hwnd As Integer) As Integer
Private Declare Function ReleaseDC Lib "user32" Alias "ReleaseDC" (ByVal hwnd As Integer, ByVal hdc As Integer) As Integer
Private Declare Function GetWindowDC Lib "user32" Alias "GetWindowDC" (ByVal hwnd As Integer) As Integer

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim ptr As System.IntPtr = GetWindowDC(Me.Handle.ToInt32)
Dim bmp As System.Drawing.Bitmap = Image.FromHbitmap(ptr)
PictureBox1.Image = bmp
ReleaseDC(Me.Handle.ToInt32, ptr)
End Sub

在网上问了一个高人
得了一C代码
private void button1_Click(object sender, EventArgs e)
{
using (Bitmap bit = new Bitmap(this.Width, this.Height))
{
this.DrawToBitmap(bit, Rectangle.FromLTRB(0, 0, this.Right, this.Bottom));
bit.Save(@"D:\\a.bmp");
}
}
--------------------
下面是转成VB2005的代码
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim bit As Bitmap = New Bitmap(Me.Width, Me.Height)
Me.DrawToBitmap(bit, Rectangle.FromLTRB(0, 0, Me.Right, Me.Bottom))
PictureBox1.Image = bit
End Sub
----------------------
大家比较下,多学点知识.呵呵