电能表校验工
设r1、r2和L1、L2分别是变压器一、二次绕组的电阻和自感，M是其互感，则理想变压器的条件是（）。A、r1＝r2＝0，L1＝L2＝M＝0B、r1＝r2＝0，L1＝L2＝M＝∞C、r1＝r2＝∞，L1＝L2＝M＝0D、r1＝r2＝∞，L1＝L2＝M＝∞
题目
设r1、r2和L1、L2分别是变压器一、二次绕组的电阻和自感，M是其互感，则理想变压器的条件是（）。
- A、r1＝r2＝0，L1＝L2＝M＝0
- B、r1＝r2＝0，L1＝L2＝M＝∞
- C、r1＝r2＝∞，L1＝L2＝M＝0
- D、r1＝r2＝∞，L1＝L2＝M＝∞
相似问题和答案
第1题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
A．10
B．30
C．40
D．50
解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。
第2题：
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下： Public X As Integer Public Y As Integer Sub S1（ ） x=1 S2 End Sub Sub S2（ ） y=10 Form1．Show End Sub Model2的代码如下： Sub Main（ ） S1 End Sub 其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是（ ）。
A.Form1→Model1→Model2
B.Model1→Model2→Form1
C.Model2→Model1→Form1
D.Model2→Form1→Model1
C。【解析】本题考查VisualBasic程序执行过程中各模块和窗体的调用过程。按照本题中代码执行，首先程序调用执行Model2，Model2中调用s1，s1数组属于Model1模块，Model1会调用s2，s2致使Form1执行，可以得出正确答案为选项C。
第3题：
在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序： Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text＝"" Text2.Text＝"" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 & Chr(Keycode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1＝"" S2＝"" End Sub 程序运行后，在Text1中输入“abc”，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为______。
A．abc和ABC
B．abc和abe
C．ABC和abc
D．ABC和ABC
解析：KeyPress事件是处理用户按键的事件过程，当用户按键时激发该事件。KeyDown事件也是在用户按下按键时发生。但是KeyDown事件过程的KeyCode参数与KeyPress事件的KeyAscii参数不同。对于KeyPress事件的KeyAscii参数来说，小写状态下按A键返回97，而对于KeyDown事件过程的KeyCode参数来说返回65，由此可判断选项C为正确答案。
第4题：
有如下程序： Private Sub Command1 Click() Dim a As Single Dim b As Single a=5：b=4 Call S(a，B)End Sub Sub S(x As Single，y As Single) t=x x=t\y y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
A．0 0
B．1 1
C．2 2
D．1 2
解析：调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程；因为在默认的情况下，变量都是通过“引用”传送给S过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值；过程S的形参获得a，b的地址，此时x=5，y=4，在过程S中，将x，即5的值赋给t，而将t\y的值赋给x。将t除以y的余数赋给y，此时x，y的值为l，1。
第5题：
编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是
A．rehcaet
B．tahreee
C．themee
D．eerthea
解析：可以看出，Sub1(ByValx1AsString，y1AsString)的作用是将参数x1的字符逆序处理，然后赋给y1，而y1是传址引用的，可以直接返回处理结果。
第6题：
在窗体中添加一个标签LblResult和一个命令按钮Command1，然后编写程序。程序的功能是单击命令按钮，计算1+2+3+4+5的值，并把结果转化为字符串显示在标签内，能够实现上述功能的程序段是， ( )
A．Private Sub Command1_Click() Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Name=Str$ (R) End Sub
B．Private Sub Command1_ClickO Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Caption= Str$ (R) End Sub
C．Private Sub Command1_Click() Dim I,R As Integer Do While I＜5 R=R+I I=I+1 Loop LblResult. Caption=Str$ (R) End Sub
D．Private Sub Command1_Click() Dim I,R As Integer Do R=R+I I=I+1 Loop While I＜5 LblResult. Caption=Str$ (R) End Sub
解析：标签的Name属性用于设置标签控件的名称，Caption属性用于设置控件的标题。题中要把结果显示在标签内，应用 Caption属性，排除选项A。选项C、D项中都只计算了1+2+3+4的值，故不满足题意。只有B项是正确的。
第7题：
【程序说明】 计算下列算式的值。a，Ai为正整数，从键盘输入。其小∑Ai＝1+2…+ Ai，Ai!＝1 *2*3*Ai(i＝1，2… a)。
【程序】
SET TAIK OFF
CLEAR
INPUT“M＝”TO M
STORE 0 TO S1，S2
FOR I=1 TO M
(8)
DO SUB1
DO SUB2
ENDFOR
? ” 所求算式的值为：“+ALLTRIM(STR(S1/S2，15，3))
SET TALK ON
PROCEDURE SUB1
(9)
FOR R＝1 TO A
K＝K+R
ENDFOR
(10)
RETURN
PROCEDURE SUB2
(11)
FOR P＝1 TO A
T=T*P
ENDFOR
(12)
RETURN
(8)
A．INPUT“A＝”TO A
B．INPUT“I=”TO I
C．INPUT“R=”TO STR(R)
D．INPUT“K＝”TOK
解析：表达式接收语句的格式；INPUT[字符表达式＞]TO内存变量＞从子过程SUB1和 SUB2中可知需接收一个A值作为正整数。
第8题：
A、Sub plus(sum, a , b ): sum = a + b: End Sub
B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub
C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub
D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub
第9题：
写出程序运行的结果
Public class Base
Public virtual string Hello() {return “Base”;}
Public class Sub:Base
Public override string Hello() {return “Sub”;}
1. Base b = new Base(); b.Hello;
2. Sub s = new Sub(); s.Hello;
3. Base b = new Sub (); b.Hello;
4. Sub s = new Base(); s.Hello;
第10题：
A. :r/^#//g
B. :1,$ s/^#//g
C. :sed s/^#//g
D. :sub s/^#//g