Need code for this question in Visual Basic.

6.1.Q30 6.1b. Lab Compound Interest: Illustrate the growth of money in a savings account. When the user clicks the button, the initial Amount is 1000 and Interest Rate (between .01 and 1) is obtained from a text box, these numbers are used to calculate the number of years until the money doubles. Note: The balance at the end of each year is (1+r) times the previous balance, where r is the annual rate of interest in decimal form. You must trap non-numeric input and display the balance at the end of each year, formatted in columns. Q6.2.Q26 6.2a. Homework Compare Compound Interest: Repeat problem 6.1b but compute and display the balances for interest compounded annually and for interest compounded monthly for 10 years. Display the year-ending balance for both methods for each year. Compare Annual and Monthly Compound I... - Amount is fixed at $1000 - Annual Rate must be a number between .01 and 1 - Monthly rate = Annual Rate / 12 - Hint: use inner loop to compound 12 times each year - Display each balance each year for 10 years Amount: 1000 Interest rate: [Annual] Display Growth of Money