use the for loop like

x=rs.recordcount
msf7.row=1

for i=1 to x
MSF7.TextMatrix(X, 0) = rs.Fields("Receipt_no")
MSF7.TextMatrix(X, 1) = rs.Fields("Sr_no")
MSF7.TextMatrix(X, 2) = rs.Fields("Item_code")
MSF7.TextMatrix(X, 3) = rs.Fields("Item_name")
MSF7.TextMatrix(X, 4) = rs.Fields("Item_type")
MSF7.TextMatrix(X, 5) = rs.Fields("Item_class")
MSF7.TextMatrix(X, 6) = rs.Fields("Product_code")
MSF7.TextMatrix(X, 7) = rs.Fields("Product_srno")
MSF7.TextMatrix(X, 8) = rs.Fields("Case_no")
MSF7.TextMatrix(X, 9) = rs.Fields("Tot_pkgs")
MSF7.TextMatrix(X, 10) = rs.Fields("Tot_qty")
MSF7.TextMatrix(X, 11) = rs.Fields("Item_location")
MSF7.TextMatrix(X, 12) = rs.Fields("Unit_cost")
MSF7.TextMatrix(X, 13) = rs.Fields("Total_cost")
MSF7.TextMatrix(X, 14) = rs.Fields("Received_by")
MSF7.TextMatrix(X, 15) = rs.Fields("Checked_by")
MSF7.TextMatrix(X, 16) = rs.Fields("Warehouse_name")
MSF7.TextMatrix(X, 17) = rs.Fields("Remarks")
msf7.row=msf7.row+1
next