下列VB程序運(yùn)行時(shí)，單擊命令按鈕Command1后，文本框Text1中顯示的內(nèi)容是：22．
Private Sub Command1_Click（ ?。?/div>（ ?。?/div>
Dim x As Integer,m As Integer
For x=1To 5
m=3
If m＞3Then m=m+2Else m=m-1
Next x
Text1．Text=Str（m）
End Sub.【考點(diǎn)】選擇語(yǔ)句；對(duì)象的屬性、方法和事件．【答案】2；（ ）【解答】【點(diǎn)評(píng)】聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書(shū)面同意，不得復(fù)制發(fā)布。發(fā)布：2024/6/27 10:35:59組卷：8引用：2難度：0.3
相似題
-
1．編寫(xiě)程序查找字符串中最長(zhǎng)連續(xù)相同字符的長(zhǎng)度：
橫線(xiàn)處可選代碼為：①h②h=0③h=h+1④Mid（s,i,l）=Mid（s,i+1，1）⑤Mid（s,i,1）=Mid（s,i-1，1），則①②③處語(yǔ)句依次為（ ?。?/h2>
-
2．下列選項(xiàng)中，與語(yǔ)句“Ifx＞188 Then y=x*0.5 Else y=x*0.8“功能相同的是（ ）
-
3．有程序代碼如下，輸入某數(shù)據(jù)后，輸出結(jié)果為“B”。那么輸入的數(shù)據(jù)可能是（ ?。?br />Dim score As Integer
score=Val（InputBox（“score：“））
If score＞89 Then
Print“A“
Else
If score＞59 Then
Print“B“
Else
Print“C“
End If
End If
（ ?。?/div>
Dim x As Integer,m As Integer
For x=1To 5
m=3
If m＞3Then m=m+2Else m=m-1
Next x
Text1．Text=Str（m）
End Sub.
Dim x As Integer,m As Integer
For x=1To 5
m=3
If m＞3Then m=m+2Else m=m-1
Next x
Text1．Text=Str（m）
End Sub.
【考點(diǎn)】選擇語(yǔ)句；對(duì)象的屬性、方法和事件．
【答案】2；（ ）
【解答】
【點(diǎn)評(píng)】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書(shū)面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/6/27 10:35:59組卷：8引用：2難度：0.3
相似題
-
1．編寫(xiě)程序查找字符串中最長(zhǎng)連續(xù)相同字符的長(zhǎng)度：
橫線(xiàn)處可選代碼為：①h②h=0③h=h+1④Mid（s,i,l）=Mid（s,i+1，1）⑤Mid（s,i,1）=Mid（s,i-1，1），則①②③處語(yǔ)句依次為（ ?。?/h2>發(fā)布：2025/1/2 10:30:2組卷：1引用：1難度：0.4 -
2．下列選項(xiàng)中，與語(yǔ)句“Ifx＞188 Then y=x*0.5 Else y=x*0.8“功能相同的是（ ）
發(fā)布：2025/1/2 10:30:2組卷：1引用：2難度：0.5 -
3．有程序代碼如下，輸入某數(shù)據(jù)后，輸出結(jié)果為“B”。那么輸入的數(shù)據(jù)可能是（ ?。?br />Dim score As Integer
score=Val（InputBox（“score：“））
If score＞89 Then
Print“A“
Else
If score＞59 Then
Print“B“
Else
Print“C“
End If
End If發(fā)布：2025/1/2 12:0:1組卷：0引用：1難度：0.6
把好題分享給你的好友吧~~
深圳市菁優(yōu)智慧教育股份有限公司
©2010-2025 jyeoo.com 版權(quán)所有
APP開(kāi)發(fā)者：深圳市菁優(yōu)智慧教育股份有限公司| 應(yīng)用名稱(chēng)：菁優(yōu)網(wǎng) | 應(yīng)用版本：5.0.7 |隱私協(xié)議|第三方SDK|用戶(hù)服務(wù)條款
本網(wǎng)部分資源來(lái)源于會(huì)員上傳，除本網(wǎng)組織的資源外，版權(quán)歸原作者所有，如有侵犯版權(quán)，請(qǐng)立刻和本網(wǎng)聯(lián)系并提供證據(jù)，本網(wǎng)將在三個(gè)工作日內(nèi)改正