15.運行如下Visual Basic程序,單擊命令按鈕Command1,出現(xiàn)如圖所示的出錯信息。發(fā)生“除數(shù)為零“錯誤時所執(zhí)行的語句是( ?。?br />Private Sub Command1_Click( ) Dim a As Integer,b As Integer,c As Single a=2'① b=a+1'② c=a/(b-3)'③ Text1.Text=Str(c)'④ End Sub。
16.在Visual Basic中,有如下程序: Private Sub Command1_Click Dim a As Integer,b As Integer,c As Integer Dim d As Integer a=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text) d=max(a,b)+max(b,c) Text4.Text=Str(d) End Sub Function max(x As Integer,y As Integer) As Integer If x>y Then max=x Else max=y End Function 運行該程序,在文本框Text1、文本框Text2、文本框Text3中分別輸入2、-5、6后,單擊命令按鈕Command1,文本框Text4中顯示的是( ?。?/h2>