一個(gè)簡(jiǎn)單的四則混合運(yùn)算式子（算式中只包含整數(shù)、+、-、*、/、=）的運(yùn)算規(guī)則是先進(jìn)行“*”或“/”，再進(jìn)行“+”或“-”，下列是用 VB 編寫的簡(jiǎn)單四則混合運(yùn)算的程序，運(yùn)行程序時(shí)在文本框 Text1 中輸入四則運(yùn)算式子，單擊命令按鈕 Command1，在標(biāo)簽Label1 中輸出結(jié)果。程序界面及代碼如下。請(qǐng)回答以下問題。
（1）若在文本框 Text1 中輸入式子“12*5-32/4+20=”，則運(yùn)行程序后在標(biāo)簽 Label1 中顯示的內(nèi)容是7272。
（2）請(qǐng)?jiān)趧澗€①②③處填入合適的代碼，讓程序能實(shí)現(xiàn)計(jì)算功能。
Private Sub Command1_Click （ ?。?br />Dim a（1 To 100）As Single,b（0 To 100）As String
Dim s As String,c As String
Dim sz As Integer,i As Integer,k As Integer
s=Text1．Text：k=0
For i=1 To Len（s）
c=Mid（s,i,1）
If c＞=“0“And c＜=“9“Then
sz=0
Do While c＞=“0“And c＜=“9“
sz=①sz+csz+c
i=i+1
c=Mid（s,i,1）
Loop
k=k+1：a（k）=sz：b（k）=c
End If
Do While k＞1 And ②yxj（k-1）＞=yxj（k）yxj（k-1）＞=yxj（k）
If b（k-1）=“+“Then a（k-1）=a（k-1）+a（k）
If b（k-1）=“-“Then a（k-1）=a（k-1）-a（k）
If b（k-1）=“*“Then a（k-1）=a（k-1）*a（k）
If b（k-1）=“/“Then a（k-1）=a（k-1）/a（k）
b（k-1）=b（k）
k=k-1
Loop
Next i
Label1．Caption=“運(yùn)算的結(jié)果是：“+Str（a（1））
End Sub
Function yxj（x As String） As Integer
If x=“*“Or x=“/“Then
yxj=1
ElseIf x=“+“Or x=“-“Then
yxj=2
Else
③yxj=0yxj=0
End If
End Function
【考點(diǎn)】編輯事件處理過(guò)程的代碼．
【答案】72；sz+c；yxj（k-1）＞=yxj（k）；yxj=0
【解答】
【點(diǎn)評(píng)】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/6/27 10:35:59組卷：10引用：1難度：0.4
相似題
-
1．學(xué)校舉辦了“語(yǔ)文作文現(xiàn)場(chǎng)賽”，參賽同學(xué)成績(jī)存儲(chǔ)在文本文件“gra.jye.ai”中，如左圖所示（每一行記錄一位同學(xué)的姓名和成績(jī)，以“：”分隔）。陳老師利用Python程序?qū)ψ魑某煽?jī)進(jìn)行處理，統(tǒng)計(jì)出各個(gè)分?jǐn)?shù)等級(jí)的人數(shù)，并輸出結(jié)果。程序運(yùn)行界面如右圖所示。
實(shí)現(xiàn)上述功能的Python程序如下，請(qǐng)?jiān)趧澗€處填入合適的代碼。
發(fā)布：2024/12/17 2:0:1組卷：6引用：2難度：0.3 -
2．有如下Python程序段：
執(zhí)行該程序段，輸入字符串“abcdefg”，則輸出的結(jié)果是（ ?。?/h2>發(fā)布：2024/12/20 6:30:1組卷：2引用：3難度：0.4 -
3．試題描述的內(nèi)容：
一個(gè)單窗體VB程序的運(yùn)行界面如圖所示。下列說(shuō)法正確的是（ ）
（1）窗體內(nèi)有1個(gè)按鈕
（2）窗體內(nèi)有2個(gè)文本框
（3）窗體內(nèi)有3個(gè)標(biāo)簽
（4）該窗體的標(biāo)題（Caption）屬性值是“加法計(jì)算器”發(fā)布：2024/12/20 20:0:2組卷：1引用：1難度：0.6
把好題分享給你的好友吧~~