I have to create a program called Sum of Numbers, with two buttons ( Enter numbers & Exit). The InputBox will be called Input Needed and will ask: Enter the positive integer value. The answer will come in a message call Sum of Numbers stating: The sum of the number 1 through is If the user enters a negative value, his application should display an error message. Use the following data: Value Sum 5 15 10 55 20 210 100 5050 This is what I have so far, but I can't get the result to show in the MessageBox Dim strUserInput Dim IntUserInput As Integer Dim i As Integer strUserInput = InputBox("Enter a positive integer value", "Input Needed", 10) If strUserInput String.Empty Then Try IntUserInput = CInt(strUserInput) If IntUserInput
Sun | Mon | Tue | Wed | Thu | Fri | Sat |
---|---|---|---|---|---|---|
1 | 2 | 3 | 4 | 5 | 6 | 7 |
8 | 9 | 10 | 11 | 12 | 13 | 14 |
15 | 16 | 17 | 18 | 19 | 20 | 21 |
22 | 23 | 24 | 25 | 26 | 27 | 28 |
29 | 30 | 1 | 2 | 3 | 4 | 5 |