[RESOLVED] Writing to a "Sequential Access File" & Printing a Report

[Stormy_VB6]

Can someone please take a look at my code and get me back on track here is what I'm trying to accomplish.

I want an application that will allow the user to enter the inventory number, quantity, and price of each item in inventory. The application should allow the user to record this information in a sequential access file named la3.dat

In addition, the application should allow the user to print a report showing the inventory number, quantity, and price of each inventory item, as well as the average price.

Inventory Number Quantity Item Price
ABC12 100 10.50
XYZ35 50 15.99
KLK25 150 20.00

Here is what I have thus far for the printing the report:

Private Sub cmdPrint_Click()
    Dim strIN As String, intQty As Integer, intIP As Integer, intAvg As Integer
    Dim strFont As String, sngSize As Single
    Dim strPS1 As String * 5, strPS2 As String * 3, strPS3 As String * 5
        
    
    strFont = Printer.Font          'save current printer settings
    sngSize = Printer.FontSize
    Printer.Font = "courier new"    'change printer settings
    Printer.FontSize = 10           'print title and headings
    Printer.Print Tab(30); "Boggs Inc.Inventory Report"
    Printer.Print
    Printer.Print Tab(5); "Inventory Number"; Tab(25); "Quatity"; Tab(37); "Item Price"
End Sub

Please Help