This is a collection of highly requested Visual Basic code that I put together back in 1998 and 1999. Almost all of these samples will work on fine on Visual Basic 5.0 and for Microsoft Excel and Microsoft Access Programming (when done with VBA), however, I've only made sure that they work in VB6.

I've been having issues trying to fix an ' End of Statement Expected' Error for this program I've been working on. Everything else seems to work fine until I've started working with the Function Statement that I called Payments. In this function I'm trying to calculate the monthlyBal for every month. The exact position that I'm getting this error is; While monthlyBal > 0 monthlyBal = Payments(tempBalances, monthlyRate) I've added the rest of the code below. Once I fixed DisplayMenu() it all compiled just fine: Sub DisplayMenu() System.Console.WriteLine('CREDIT CARD CALCULATOR MENU') System.Console.WriteLine('===========================') System.Console.WriteLine('OPTION 1. Display Total Number Of Payments Required To Pay Off Each Card. ') System.Console.WriteLine() System.Console.WriteLine('OPTION 2.

Display The Number Of Years, Or Months To Pay Off Each Card. ') System.Console.WriteLine() System.Console.WriteLine('OPTION 3. Display The Balance To Payoff Each Card and Total Amount To Payoff All Cards Combined. Shabloni voennoj formi vvs dlya foto na dokumenti. ') System.Console.WriteLine() System.Console.WriteLine('OPTION 4. Exit The Program.

') System.Console.WriteLine() System.Console.WriteLine('=============================================================================') System.Console.WriteLine('Instructions: Type The Number That Is Next To The Option You Want To Execute. In VB, you can not split strings in multiple lines like this 'This will give an error System.Console.WriteLine('OPTION 3. Display The Balance To Amount To Payoff Each Card and Total Payoff All Cards Combined. ') Even if you remove the blank line in the middle, this will also give you an error 'This will also give an error System.Console.WriteLine('OPTION 3. Display The Balance To Amount To Payoff Each Card and Total Payoff All Cards Combined. ') Here is what you can do if you must break long lines of code in VB: 'This is acceptable System.Console.WriteLine('OPTION 3. Display The Balance To Amount To ' & _ 'Payoff Each Card and Total Payoff All Cards Combined.

') Or alternatively, (if you must have blank lines in between your code) you can type it like this: 'This is also acceptable System.Console.WriteLine('OPTION 3. Display The Balance To Amount To ' & _ ' & _ 'Payoff Each Card and Total Payoff All Cards Combined.

Pinkle makhijani supermarket billing system vb project • 1.