小明在物理課堂上學(xué)了并聯(lián)電阻的阻值計(jì)算知識(shí)(并聯(lián)后的電阻阻值的倒數(shù)等于各個(gè)并聯(lián)電阻阻值的 倒數(shù)之和)后編寫了一個(gè)計(jì)算并聯(lián)電阻阻值的程序,程序界面如16題圖所示。在文本框Text1中輸入各 個(gè)并聯(lián)電阻的阻值以“,”為間隔,單擊“計(jì)算”按鈕Command1后,將這些電阻并聯(lián)后的阻值計(jì)算結(jié)果顯 示在Label4中。
(1)要使程序運(yùn)行后,窗體Form1的標(biāo)題欄中顯示“阻值計(jì)算”,正確的做法是 cc(單選,填字母:A.將窗體的Text屬性改為“阻值計(jì)算”/B.在Form_Load ( ?。┦录休斎氪aForm1.Caption=“阻值計(jì)算”/C.在Form1_Load ( )事件中輸入代碼Form.Name=“阻值計(jì)算”);
(2)實(shí)現(xiàn)上述功能的程序如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
PrivateSubCommand1_Click ( ?。?br />Dims As String,rAs String,ch As String
DimRsAs Single‘Rs變量表示并聯(lián)后的總阻值
Dimi AsInteger
s=Text1.Text
r=““:i=1:Rs=0
DoWhile i<=Len(s)i<=Len(s)
ch=Mid(s,i,1)If ch<>“,“Then
r=r+ch
Else
Rs=Rs+1/Val(r)
r=““
EndIf
i=i+1
Loop
Rs=Rs+1/val(r)Rs+1/val(r) Rs=1/Rs
Label4.Caption=str(Rs)+“歐姆”str(Rs)+“歐姆”
End Sub
如果在文本框Text1中輸入“2,2,”后,單擊“計(jì)算”按鈕后,則程序的運(yùn)行結(jié)果為 除數(shù)為零除數(shù)為零。
【考點(diǎn)】編輯事件處理過程的代碼.
【答案】c;i<=Len(s);Rs+1/val(r);str(Rs)+“歐姆”;除數(shù)為零
【解答】
【點(diǎn)評(píng)】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/4/20 14:35:0組卷:3引用:1難度:0.5
相似題
-
1.學(xué)校舉辦了“語文作文現(xiàn)場賽”,參賽同學(xué)成績存儲(chǔ)在文本文件“gra.jye.ai”中,如左圖所示(每一行記錄一位同學(xué)的姓名和成績,以“:”分隔)。陳老師利用Python程序?qū)ψ魑某煽冞M(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é)果是( )發(fā)布:2024/12/20 6:30:1組卷:2引用:3難度:0.4 -
3.試題描述的內(nèi)容:
一個(gè)單窗體VB程序的運(yùn)行界面如圖所示。下列說法正確的是( ?。?br />(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
把好題分享給你的好友吧~~