How to stop paper ejecting in vb while using printer object

http://support.microsoft.com/?kbid=322091

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.IO;
using System.Drawing.Printing;
using System.Data.SqlClient;


namespace PrintApp
{
public partial class Form1 : Form
{
private PrintDocument printDocument1 = new PrintDocument();
private string stringToPrint;
int cntng;
public Form1()
{
InitializeComponent();
printDocument1.PrintPage+=new PrintPageEventHandler(printDocument1_PrintPage);

}

private void button1_Click(object sender, EventArgs e)
{
string query = Application.StartupPath + "\\text.txt";
using (StreamWriter sw = new StreamWriter(Application.StartupPath + "\\text.txt"))
{
sw.WriteLine("BILL WISE PROFIT REPORT");
}
ReadFile();
printDocument1.Print();



}
private void ReadFile()
{

using (StreamReader sr = new StreamReader(Application.StartupPath + "\\text.txt"))
{
cntng = File.ReadAllLines(Application.StartupPath + "\\text.txt").Length;
for (int i = 0; i < cntng; i++)
{

stringToPrint = sr.ReadToEnd();

}

}

}

private void printDocument1_PrintPage(object sender, PrintPageEventArgs e)
{
int charactersOnPage = 0;
int linesPerPage = 0;
Font printfont = new Font("TAMKural", 10);
e.Graphics.MeasureString(stringToPrint, printfont,
e.MarginBounds.Size, StringFormat.GenericTypographic,
out charactersOnPage, out linesPerPage);
e.Graphics.DrawString(stringToPrint, printfont, Brushes.Black,
e.MarginBounds, StringFormat.GenericTypographic);
stringToPrint = stringToPrint.Substring(charactersOnPage);

e.HasMorePages = (stringToPrint.Length > 0);



}
}
}