完善程序(共20道题)1.实现功能:在Text1、Text2、Text3中输入三个整数后,单击“输出最大值”按钮后,在Label3中显示这3个数中的最大值。Private Sub Command1_Click() Dim a, b, c, max As Integer a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) If a b Then max = a Else If c max Then Label3.Caption = CStr(max)End Sub答案: max=b max=c2.计算s=5+10+15+20的和s=For n=5 to 20 step s=s+nnext nprint s答案: 0 53.计算1-100之间偶数的积s=For n=100 to 1 step s=s*nnext nprint s