VB2008

Part Two : Find the output for following program? 1. Dim counter, sum As Integer sum = 1000 For counter = 100 To 5 Step-5 sum - = counter ListBox1.Items.Add(sum) Next 2. MsgBox(Math.round(6.100054, 5)) 13.2023 1 Add file 3. * Part one :Write two programs in VB2008 ? 1. Find factorial of any input number and then test result of factorial if (even or odd)? 2. define variable grade with type string and then if the grade with class "A" then print" High Distinction", with class "A-"print" Distinction", with class "B" print " Credit" with class "C" print "credit" and the reset "fail