为区别相序，交流三相系统中L1、L2、L3三相裸导线的涂色分别为（）。A、红、绿、黄B、绿、红、黄C、黄、红、绿D、黄、绿、红

题目

为区别相序，交流三相系统中L₁、L₂、L₃三相裸导线的涂色分别为（）。

A、红、绿、黄
B、绿、红、黄
C、黄、红、绿
D、黄、绿、红

相似考题

1.有以下程序：Private Sub Form_Activate()For j=1 to 3x=3For i=l to 2x=x+6NextNextPrint xEnd Sub程序运行后，窗体上显示的结果为______。

2.在窗体上画两个标签和一个命令按钮，其名称分别为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和10B．1234和100C．ABCD和100D．1234和10

3.在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：DimaAsIntegerSubtest()a=a+1:b=b+1:c=c+1Print"Sub:";a;"，";b;"，";cEndSubPrivateSubCommand1_Click()a=2:b=3:c=4CalltestCalltestEndSub程序运行后，单击命令按钮，窗体中将显示( )A.Sub：3，4，5Sub：4，5，6B.Sub：2，3，4Sub：2，3，4C.Sub：3，1，1Sub：4，1，1D.Sub：1，1，1Sub：1，1，1

4.有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【】。

更多“为区别相序，交流三相系统中L1、L<sub”相关问题

第1题：

阅读下列程序。
Option Base 1
Private Sub Form. Click()
Dim x(3,3)
For j=l to 3
For k=l to 3
If j=k then x(j,k)=l
If j＜＞k then x(j,k)=k
Next k
Next j
Call fun(x())
End Sub
Private Sub fun(x() )
For j=1 to 3
For k=1 to 3
Print x(j,k);
Next k
Next j
End Sub
运行程序时，输出结果为【】

正确答案：1 2 311 3 1 21
1 2 311 3 1 21 解析：本题考查考生对数组虚实结合掌握的情况。事件过程声明了一个二维数组，并利用循环产生3*3数组，由题干可知，该数组对角线元素全部为1，其余元素为3。调用fun过程时，采用了虚实结合的方法，然后执行该过程。在过程中访问x数组就是事件过程中的数组，优先输出了x数组的所有元素值，由于在输出时执行了Print x(j,k)，并且输出数据语句后有分号，因此只输出一行。
第2题：

执行下列程序，输入框中显示的默认字符串为上【】：
Private Sub Command l_Click ()
Input Box”ok”“输入参数”，Format(”GHl2”’
End Sub

正确答案：18
18 解析：本题考查Input Box语句和Format函数的用法。当Format函数处理可能为数字的字符串时，会自动进行运算转换，即将&H12当作16进制数，实际显示10进制数“18”。，考生应该多看看Format函数的用法，其中有很多变化。
第3题：

在窗体上画两个标签和一个命令按钮，其名称分别为Label1、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(Label1，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调用函数后，Label1.Caption="1234"，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Label2．Caption=a后， Label2中显示的值仍为10。
第4题：

假定有如下的Sub过程：
Sub Sub1(x As Single，y As single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_click()
Dim a As Single
Dim b As Single
a=5
b=4
Sub1 a，b
Print a；b
End Sub
程序运行后，单击命令按钮，输出结果为
A．
B．
C．
D．

正确答案：D
解析：在调用通用过程时要注意的是参数的传递方式。本题中两个变量都是以传值方式传递。根据传值方式的定义不难计算出本题结果。
第5题：

在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click()
a1=1:b=2:c1=3
Call Sub1(a,b1+3,c1)
Print"Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
A．Sub: 2 6 4 Main: 2 6 4
B．Sub: 2 6 4 Main: 2 6 4
C．Sub: 2 6 4 Main: 1 2 3
D．Sub: 2 6 4 Main: 2 2 3

正确答案：D
解析：考查考生对参数传递的掌握情况。这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送,b1+3和c1为表达式按值传送。参数的传值方式和传址方式的区别。
第6题：

在窗体上画l个命令按钮和l个文本框，其名称为Command1和Text1，再编写如下程序： Dim ss As String Private Sub Text1 KeyPress(KeyAscii As Integer) If Chr(KeyAscii)<>""Then ss=ss+Chr(KeyAscii) End Sub Private Sub Command1 Click（） Dim m As String，i As Integer For i=Len(ss)To 1 Step-1 m=m+Mid(SS，i，1) Next Text1．Text=UCase(m) End Sub 程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是（）。
A.NUMtBER l00
B.REBMUN
C.REBM UN l00
D.001 REBMUN

正确答案：D
D。【解析】本题是从后往前依次取SS的字符加到m后，起到了逆序输出的结果。
第7题：

在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click() a1=1：b=2：c1=3 Call Sub1(a，b1+3，c1) Print"Main："；a1；b1；c1 End Sub 程序运行后，输出结果为
A．Sub： 2 6 4 Main： 2 6 4
B．Sub： 2 6 4 Main： 2 6 4
C．Sub： 2 6 4 Main： 1 2 3
D．Sub： 2 6 4 Main： 2 2 3

正确答案：D
解析：这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送，b1+3和c1为表达式按值传送。
第8题：

把C盘路径为/SUB1的文件ASD.BAK更名为ASD，下面（）命令是正确的。
- A、REN C://SUB1/ASD.BAK C:///SUB1/ASD
- B、REN C:///SUB1/ASD.BAK C://ASD
- C、RENAME C:///SUB1/ASD.BAK
- D、REN C:///SUB1/ASD.BAK ASD
正确答案:D
第9题：

单选题
变直径圆管流，细断面直径d1，粗断面直径d2=2d1，粗细断面雷诺数的关系是（）。
A
Re1=0.5Re2
B
Re1=Re2
C
Re1=1.5Re2
D
Re1=2Re2 

正确答案： D
解析：暂无解析
第10题：

单选题
永续盘存法公式为（）
A
Kt＋1＝It－（1－δ）Kt
B
Kt＋1＝It＋（1－δ）Kt
C
Kt＋1＝It＋（1＋δ）Kt
D
Kt＋1＝It－（1＋δ）Kt

正确答案： C
解析：若用Kt表示第t期初的固定资产存量，It表示第t期投资购建的固定资产数量，δ表示固定资产的折旧率，则有永续盘存法公式为：Kt＋1＝It＋（1－δ）Kt。
第11题：

多选题
下列表示中____的表示形式是正确的。
A
U95= 1%,veff =9 
B
Ur= 1%,k=2 
C
uC=0. 5% 
D
uC=±0 5%．k=1 

正确答案： D,B
解析：
第12题：

多选题
在过程控制中，若TL=-3，Tu=3,u=1,σ=1,则(　　)。
A
CP=1
B
CP=2/3
C
CPk=1
D
CPk=2/3

正确答案： C,D
解析：暂无解析
第13题：

窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（）。
A.Private Sub Form1 Click（）
End Sub···
B.Private Sub Form1. Click（）
End Sub···
C.Private Sub Command1 click（）
End Sub···
D.Private Sub Command Click（）
End Sub···

正确答案：B
B。【解析】窗体单击事件为Form—Click事件。
第14题：

以下能够正确计算n!的程序是
A．Private Sub Command1_Chck( ) n=5：x=1 Do x=x*i i=i+1 Loop While i＜n Print x End Sub
B．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜n Print x End Sub
C．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜=n Print x End Sub
D．Private Sub Command1_Click( ) n=5：x=1：i=l Dox=x*i i=i+1 Loop While i＞n Print x End Sub

正确答案：C
解析：A中i一开始末被赋值，默认为0；B项中由于“in”的条件使得Do循环比应有循环次数少循环一次；选项D由于“i＞n”这一条件，使得控制语句只能循环一次。
第15题：

在窗体上画两个标签和一个命令按钮，其名称分别为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。
第16题：

在窗体中添加一个命令按钮，编写如下程序： Private Sub Test(p，m，n) p=p+1：m=m+1：n=n+1 Print "Sub: ";p；m；n End Sub Private Sub Command1.Click() a1=1：b=2：c1=3 Call Test((a，b1+3，(c1)) Print "Main："；a1；b1；c1 End Sub 程序运行后，输出结果为
A．Sub： 2 6 4 Main： 2 6 4
B．Sub： 2 6 4 Main： 2 6 4
C．Sub： 2 6 4 Main： 1 2 3
D．Sub： 2 6 4 Main： 2 2 3

正确答案：D
解析：这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送，b1+3和(c1)为表达式按值传送。
第17题：

若要在子过程Proc l调用后返回两个变量的结果，下列过程定义语句中有效的是( )。
A．Sub Proc1(n,m)
B．Sub Proc1(By Val n ,m)
C．Sub Proc1(n, By Val m)
D．Sub Proc1 (By Val n,By Val m)

正确答案：A
解析：本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用，此时形参的变化不会返回到实参；若用ByRef声明，说明此参数为传址调用，此时形参的变化将会返回到实参；没有说明传递类型，则默认为传址传递。由于本题要求可以返回两个变量的结果，所以应该使用传址调用，不能出现传值调用，也就是不能出现使用ByVal声明的形参。
第18题：

单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click( ) Dim x As Integer，y As Integer x=50：y=78 Call PPP(x，y) Print x；y End Sub Public Sub PPP(ByVM n As Integer，ByVal m As Integer) n=n\l0 m=m\l0 End Sub
A．08
B．50 78
C．450
D．78 50

正确答案：B
解析：在调用过程时，一般主调与被调过程之间有数据传递，即将主调过程的实参传递给被调用的过程，完成实参与形参的结合，然后执行被调过程，在VisualBasic中，实参与形参的结合有两种方式，即传址与传值。这两种方法的特点如下：1)传址的结合过程时：当调用一个过程时，它将实参的地址传给形参，因此在被调用的过程中，对形参的任何操作都变成了对相应实参的操作，因此实参的值会随形参的改变而改变。2)传值的结合过程时：当调用一个过程时，系统将实参的值复制给形参并断开了联系，被调用过程中的操作是在形参自己的存储单元中进行的，当过程调用结束时，这些形参所占用的存储单元也同时被释放，因此在过程中对形参的任何操作不会影响实参。而题中被调过程PPP中有两个形参，两者均为传值方式。主调过程分别把实参x、y传递给PPP，所以当过程调用结束后，实参x、y的值都没有改变，最后输出的值应为5078。
第19题：

设当前目录是根目录，使用第（）组命令不能在一级子目录SUB1下建立二级子目录SUB11。
- A、CD SUB1（回车）MD SUB11
- B、MD SUB1/SUB11
- C、MD SUB11
- D、MD/SUB1/SUB11
正确答案:C
第20题：

单选题
假设ed为需求弹性，当(　　)时，商品降价将使企业销售收入增加。
A
|ed|>1
B
|ed|=1
C
0<|ed|<1
D
|ed|=0

正确答案： C
解析：暂无解析
第21题：

多选题
下列扩展不确定度的表示中，表示形式是正确的是____。
A
U95=1%(veff=9)
B
Ur=1%(k=2)
C
uCr=0.5%
D
U=±0.5%（k=1）

正确答案： C,D
解析：
第22题：

多选题
标准砝码的质量为m，测量得到的最佳估计值为100.02147g，合成标准不确定uc(ms) 为0.35mg，取包含因子k=2，以下表示的测量结果中 ( ) 是正确的。
A
ms=100.02147g；U=0.70mg，k=2
B
ms=(100.02147±0.00070)g；k=2
C
ms=100.02147g；uc(ms)=0.35mg，k=1
D
ms=100.02147g；uc(ms)=0.35mg

正确答案： A,B,D
解析：
第23题：

单选题
若声压级相同的n个声音叠加，即L1=L2=…=Li……=Ln，则总声压级比L1增加了()dB。
A
10igL1 
B
lgL1 
C
10lgn
D
nlg10

正确答案： D
解析：

为区别相序，交流三相系统中L1、L2、L3三相裸导线的涂色分别为（）。A、红、绿、黄B、绿、红、黄C、黄、红、绿D、黄、绿、红

题目

相似考题

更多“为区别相序，交流三相系统中L<sub>1</sub>、L<sub”相关问题

相关内容