[VB6] commando button e componente PrintDocument

[biifu]

Che roba è?

vorrei usare questo codice per stampare il contenuto di una datagrid....

Private Sub PrintGrid_Click(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles PrintGrid.Click
   PrintDocument1.Print()
End Sub

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, _
   ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles _
   PrintDocument1.PrintPage
   Dim myPaintArgs As New PaintEventArgs(e.Graphics, New Rectangle(New _
      Point(0, 0), Me.Size))
   Me.InvokePaint(DataGrid1, myPaintArgs)
End Sub

ma il printgrid è un button, non un commandbutton (mai sentito.... che ignoranza)