打印问题，再线等待！

打印时Form2.GRID.TextMatrix(i, 2) 的东西无法打印出来。
怎么回事？？
另外想问问怎么排版呀，打印出来的很乱！多谢
Open "Lpt1" For Output As #1
     pdstr1 = "----------------------------" + Chr(10)
     pdstr2 = "音像租赁" + Chr(10)
     pdstr3 = "销售笔号：" & Form2.Label2.Caption + Chr(10)
     For i = 1 To Form2.total_rec
     pdstr4 = "片名：" & Form2.GRID.TextMatrix(i, 2) + Chr(10)
     Next
     pdstr5 =“时间" & now
     Print #1, pdstr1, pdstr2, pdstr3, pdstr4,pdstr5
     Close #1