违法和不良信息举报 联系客服
免费注册 登录

有两只电流表，其内阻分别为：R<sub>l</sub>=20Ω，

题目

有两只电流表，其内阻分别为：Rl=20Ω，R2=500Ω，先后串接在电压E=6V和保护电阻R=1000Ω的电路上，其中内阻Rl =20Ω的电流表读数较正确。

如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

以下程序用来输出20个在开区间(10,87)上的随机整数数R,每行输出4个整数。请完成空白处.

Private Sub Commandl. Click( )

For I=1 To 10

R = Int (Rnd * 76 + 11)

Print R;

If【 】Then Print

Next I

End Sub


正确答案：I Mo8 4=0
I Mo8 4=0 解析：要产生开区间(10，87)上的随机整数，应该使用Int(Rnd*76+11)，注意因为开区间(10，87)从11开始，所以不能使用数字10换行，可以使用Mod语句来实现，根据题意I=4、 I=8等能被4整除的数值时输出换行符号。

第2题：

在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写下列程序： Private Sub rune(L AS Labe1) Caption="1234" End Sub Private Sub Form. Load（ ） Labe11．Caption="ABCDE" Labe12．Caption=10 End Sub Private Sub Command1Click（ ） a=Va1(Label2．Caption) Call func(Label1) Label2．Caption a End Sub 程序运行后，单击命令按钮，则在两个标签中显示的内容分别为（ ）。

A.ABCD和10

B.1234和100

C.ABCD和100

D.1234和10


正确答案：D
D。【解析】在VisualBasic中不仅可以使用变量作为形式参数，还可以使用窗体或控件作为通用过程的参数。本题源程序在命令按钮的单击事件过程中，通过调用过程func将标签Label1的标题修改为“1234”；而标签Label2的标题保持不变，还是10。

第3题：

在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。

A．ABCD和10

B．1234和100

C．ABCD和100

D．1234和10


正确答案：D
解析：单击命令按钮后变量a赋初值a=10，通过Call调用函数后，Labell.Caption="1234"，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Label2．Caption=a后， Label2中显示的值仍为10。

第4题：

以下程序用来输出20个在开区间(10，87)上的随机整数R，每行输出4个整数。请完成空白处。

Private Sub Command1 Click()

For I=1 To 10

R=Int(Rnd*76+11)

Print R；

If【 】Then Print

Next I

End Sub


正确答案：I Mod 4=0
I Mod 4=0 解析：本题考查Int函数的用法。要产生开区间(10，87)上的随机整数，根据 Int函数的用法，应该使用Int(Rnd*76+11)，注意因为开区间(10，87)从11开始，所以不能使用数字10。换行可以使用Mod语句来实现，根据题意I=4，I=8等能被4整除的数值时输出换行符号。

第5题：

下列程序的输出结果是【 】。

Private Sub Command l Click()

Dim a(1 TO 20)

Dim i

For i＝1 TO 20

a(i)＝i

Next i

For Each i In a()

a(i)＝20

Next i

Print a(2) End Sub


正确答案：20
20 解析：本题考查For Next…Each语句的用法，For Next…Each语句是针对数组和集合中的每一个元素进行…次操作的语句组合。本题定义了一个数组，然后利用For循环将1～20赋给数组元素，又利用For Each Next语句将数组的每一个元素定义为20，故输出结果为20。

第6题：

有以下程序： #include<stdio．h> #define SUB(a)(a)-(a) main（ ） {int a=2，b=3，c=5，d； d=SUB(a+b)*C； printf("%d\n"，d)； } 程序运行后的输出结果是（ ）。

A.0

B.-l2

C.-20

D.10


正确答案：C
本题调用参数，并考查了优先级。SUB(a+b)*C调用后可写成(a书b)-(a+b)*C，结果为5-25=-20。

第7题：

在窗体上画两个标签和一个命令按钮，其名称分别为Labe11、Labe12和Command1，然后编写如下程序： Private SUb fune(L As Label，By Val a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form. Load() LabeCaptlon="ABCD" LabeCapfion=10 End Sub Private SUb Command1_Click() a=Val(Label2.Caption) Callfunc(Labell，A)LabeCaption=a End Sub 程序运行后，单击命令按钮，在两个标签Labe11和Labe12中显示的内容分别是______。

A．ABCD和10

B．1234和100

C．ABCD和100

D．1234和10


正确答案：D
解析：单击命令按钮后变量a赋初值a=10，通过Call调用函数后，Labell．Caption="1234"，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Labe12.Caption=a后， Label2中显示的值仍为10。

第8题：

（ 27 ）在窗体上画两个标签和一个命令按钮，其名称分别为 Label1 、 Label2 和 Command1 ，然后编写如下程序：

Private Sub func(L As Label)

L.Caption= ” 1234 ”

End sub

Private Sub Form_Load()

Label2.Caption=10

End sub

Private Sub Command1_Click()

A=Val(Label2.Caption)

Call func(Label1)

Label2.Caption=a

End sub

程序运行后，单击命令按钮，则在两个标签中显示的内容分别为

A ） ABCD 和 10

B ） 1234 和 100

C ） ABCD 和 100

D ） 1234 和 10


正确答案：D

第9题：

A、PH7.38，PaO<SUB>2</SUB>50mmHg，PaCO<SUB>2</SUB>40mmHg

B、PH7.30，PaO<SUB>2</SUB>50mmHg，PaCO<SUB>2</SUB>80mmHg

C、PH7.40，PaO<SUB>2</SUB>60mmHg，PaCO<SUB>2</SUB>65mmHg

D、PH7.35，PaO<SUB>2</SUB>80mmHg，PaCO<SUB>2</SUB>20mmHg

E、PH7.25，PaO<SUB>2</SUB>70mmHg，PaCO<SUB>2</SUB>20mmHg

血气分析结果符合代偿性代谢性酸中毒（ ）


正确答案：D

第10题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：Public X As Integer Private Sub Commandl Click（ ）x＝10 Call slCall s2MsgBox x End Sub Private Sub sl（ ）x＝x+20 End Sub Private Sub s2（ ）Dim x As Integer x=x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50


正确答案：B
B。【解析】在本题中，定义了一个全局变量X，在命令按钮的单击事件中对这个X赋值为10，然后依次调用sl和s2；在s1中对X自加了20；在s2中用Dim定义了一个局部变量x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量X而不是全局变量X。所以本题输出结果为30。

更多相关问题
相关内容