RLC串联的正弦交流电路中，当XL=XC时，电路发生谐振，谐振特性有（）。A、电容上电压与电感上电压大小相等，方向相反B、电路中电流最大C、电路中阻抗最小D、电路中无功功率为0E、电阻上电压与外加电压大小相等，方向相反

题目

RLC串联的正弦交流电路中，当X_L=X_C时，电路发生谐振，谐振特性有（）。

A、电容上电压与电感上电压大小相等，方向相反
B、电路中电流最大
C、电路中阻抗最小
D、电路中无功功率为0
E、电阻上电压与外加电压大小相等，方向相反

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

相似问题和答案

第1题：

在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：

Public x as integer

Private Sub Command1_Click( )

x=5

Call s1

Call s2

MsgBox x

End Sub

Private Sub s1( )

x=x+10

End Sub

Private Sub s2( )

Dim x as integer

x=x+10

End Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果是______

正确答案：15
15 解析：本题使用Call调用子过程s1，s2。x=5在调用子过程s1后，x= 15，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于使用Dim…As关键字定义x，所以其值是模块范围的。所以在消息框中输出的值，是从子过程s2传回的值。

第2题：

在RLC串联正弦交流电路中,当XL()XC,电路呈感性;当XL()XC,电路呈容性。

参考答案：大于;小于

第3题：

（8）下列这个Sub过程的功能是统计字符串中“a”的个数，请在空白处填上合适的代码，将程序补充完整。Private Sub numCount() Dim num As Integer s$="software And hardware" Num=Len(s$) For i=1 unm b$=。 If b$="a"Then x=x+1 Next i Print"x="；xEnd Sub

正确答案：Mid(s$,i,1)
【解析】分析题目和程序段可知，空白处的作用是取出字符串s中的第i个字符，这里可以使用Mid函数来取出第i个字符，然后对比该字符是否是字符a，如果是，则变量x加1，如果不是则跳过if后面的语句继续循环，最后输出x。

第4题：

假定有如下的Sub过程： Sub S(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 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为 ______ 。

A．5 4

B．1 1

C．1.25 4

D．1.25 1

正确答案：D
解析：Visual Basic的函数参数默认的方式是传地址的，所以函数S对参数做的改变会反映到原来的变量里。

第5题：

在窗体中添加一个名称为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

正确答案：B
解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。

第6题：

下面各被调用函数首部书写正确的是( )

A．void sub(float x；float y)；

B．void sub(float x，y)

C．void sub(float x，float y)

D．void sub(float x，float y)；

正确答案：C

第7题：

以下能够正确计算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”这一条件，使得控制语句只能循环一次。

第8题：

以下过程的定义中,( )是错误的。

A、Public Sub Sum(x ; y)

B、Public Sub Sum(ByVal x, ByVal y)

C、Public Sub Sum(x As Integer,y As Integer)

D、Public Sub Sum(x%, y%)

参考答案：A

第9题：

下列程序的功能是:当x<50时,y =0.8 xx;当50≤x≤100时,y=0.7 xx;当x>100时, Private Sub Command1_

下列程序的功能是：当x＜50时，y =0.8 xx;当50≤x≤100时，y=0.7 xx;当x＞100时,

Private Sub Command1_Click()

Dim x As Single

x = InputBox("请输入x的值" )

Select Case x

Case Is＜50

y=0.8 * x

Case 50 To 100

y=0.7 * x

【】

Print "输入数据出界!"

End Select

Print x, y

End Sub

正确答案：Case Else
Case Else 解析：阅读程序后，在Select Case结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将 x的值分为3种情况，空白处应该填写Case Else语句。

第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。

RLC串联的正弦交流电路中，当X<sub>L</sub>=X<s

题目

相似问题和答案

更多相关问题

相关内容