Real beginner in here

[pamela]

I am just helping out someone here and am looking for a simple code for a church to give out receipts for donations. What they require is the code to generate a new receipt number then the next number and so on. So for the first receipt it would be #1 then next it would be #2. I am helping them with their accounting and Simply lets me code in VB to create a receipt form in Crystal reports. I am sorry I know nothing of the syntax and have gone through books that friends have given me to find the simple code to start this going. Any kind help would be greatly appreciated. As you can tell this a voluntary thing.

Thanks and your kind consideration is greatly appreciated.

[Buddy008]

Some more information would be fantastic.

Like what else is in your form, is it say like two textboxes and a button.

One TextBox for Donation amount, and one for Receipt Number
and then maybe a print button or something??

If your case is something like that then you could:

'in general declarations
Dim ReceiptNumber as Integer

Private Sub cmdPrint_Click()
     ReceiptNumber = ReceiptNumber + 1
     txtboxRNum = ReceiptNumber
end sub

Also, if your not always running this program, and well probably a good idea anyway, you could store this number in a text file.

Open "ReceiptNumber.txt" For Output As #1
      Print #1, ReceiptNumber
Close #1

'and to bring it in on load
Private Sub Form_Load()
Open "ReceiptNumber.txt" For Input As #1
     Line Input #1, ReceiptNumber
Close #1

txtboxRNum = ReceiptNumber

End Sub

I hope this helps at least some.

[JonnyPoet]

...code in VB to create a receipt form in Crystal reports...

There is a special Forum here for Crystal reports. IMHO this maybe is more a Crystal Report project as you described it. Or it is a mixed one. But I could imagine that your problem to put numbers in that Form which adds up automatically is maybe a thing easier done in Crystel Reports itself. But its only my opinion, because I never tried Crystal Reports. So as a hint: additional ask there