On 3 Jun 1997 11:35:40 GMT, "Warren Weber"  wrote:

>
>I 
have
 a requirement to print the contents of Grid control that can be
>bound or ubound.

I don't know if this is a better way but...

Sub PrintGrid

Dim t%, s%

For t% = 0 To Grid1.Rows -1
	Grid1.Row = t%
	For s% = 0 To Grid1.Cols -1	
		Grid1.Col = s%
		Printer.Print Grid1.Text
	Nex s%
Next t%

End Sub