求VB打印DataGrid1控件中的内容的代码
用Adodc1控件把ACCESS数据库的内容显示在DataGrid1
怎么样才能打印DataGrid1的内容。
越简单越好，谢谢。 --------------------编程问答-------------------- 用打印控件，CurPrint --------------------编程问答--------------------
可以详细的说明下吗？谢谢。 --------------------编程问答-------------------- 用ADODC1.RECORDCOUT=行数,
DataGrid1.COU() G列数
DataGrid1.COL=I
DataGrid1.ROW=J 定位
DataGrid1.TEXT
--------------------编程问答-------------------- 最现成的，用 PictureBox 控件。
要用两个，一个用来放你需要打印的所有控件，另一个可以隐藏（例如藏在第一个后面）。
Picture1.SetFocus
Picture2.AutoRedraw = True
rv = SendMessage(Picture1.hwnd, WM_PAINT, Picture2.hDC, 0)
rv = SendMessage(Picture1.hwnd, WM_PRINT, Picture2.hDC, _
PRF_CHILDREN + PRF_CLIENT + PRF_OWNED)
Picture2.Picture = Picture2.Image
Picture2.AutoRedraw = False
Printer.Print ""
Printer.PaintPicture Picture2.Picture, 0, 0
Printer.EndDoc
补充：VB , 数据库(包含打印，安装，报表)
