( ?。?/div>
( ?。?/div>
Dim a As Single,b As Single,ch As String
a=Val(Text1.Text)
b=Val(Text2.Text)
If ch=“+“Then
Text4.Text=Str(a+b)
ElseIf ch=“*“Then
Text4.Text=Str(a*b)
ElseIf ch=“-“Then
Text4.Text=Str(a-b)
ElseIf ch=“/“Then
If
Then Text4.Text=Str(a/b) Else Text4.Text=“除數(shù)不能是零“
Else
Text4.Text=“運算符不正確
Text4.Text=“運算符不正確
End If
End Sub
(1)解決此問題采用的算法是
解析算法
解析算法
.(填:解析算法/枚舉算法/查找算法)
(2)程序中橫線處①應(yīng)填入
ch=Text3.text
ch=Text3.text
程序中橫線處②應(yīng)填入
b<>0
b<>0
程序中橫線處③應(yīng)填入
Text4.Text=“運算符不正確
Text4.Text=“運算符不正確
.
【答案】( ?。籘ext4.Text=“運算符不正確;解析算法;ch=Text3.text;b<>0;Text4.Text=“運算符不正確
【解答】
【點評】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:10引用:3難度:0.1