网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有一个感抗XL=1Ω的纯电感，将它接入正弦电源时其电流为1A，将1个电容与该电感并联，若电路中的总电流仍然是1A，则电容器的容抗是（）
- A、1
- B、2
- C、0.5
- D、0.25
参考答案
更多 “有一个感抗XL=1Ω的纯电感，将它接入正弦电源时其电流为1A，将1个电容与该电感并联，若电路中的总电流仍然是1A，则电容器的容抗是（）A、1B、2C、0.5D、0.25” 相关考题
考题
有以下程序：Private Sub Form_Activate()For j=1 to 3x=3For i=l to 2x=x+6NextNextPrint xEnd Sub程序运行后，窗体上显示的结果为______。
考题
（33）下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.Function f1l%(f1%) D.Function f1%(x As Integer)
考题
阅读下列程序。Option Base 1Private Sub Form. Click()Dim x(3,3)For j=l to 3For k=l to 3If j=k then x(j,k)=lIf j＜＞k then x(j,k)=kNext kNext jCall fun(x())End SubPrivate Sub fun(x() )For j=1 to 3For k=1 to 3Print x(j,k);Next kNext jEnd Sub运行程序时，输出结果为【 】
考题
在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：Public x as integerPrivate Sub Command1_Click( )x=5Call s1Call s2MsgBox xEnd SubPrivate Sub s1( )x=x+10End SubPrivate Sub s2( )Dim x as integerx=x+10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果是______
考题
窗体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···
考题
在窗体中添加一个名称为Cmd的命令按钮，然后编写如下程序： Public x As integer Private Sub Cmd_Click() x=10 Call add1 Call add2 MsgBox x End Sub Private Sub add1 ( ) x=x+20 End Sub Private Sub add2 ( ) Dim x As integer x=x+40 End Snb 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。A．10B．60C．30D．70
考题
以下能够正确计算n!的程序是A．Private Sub Command1_Chck( ) n=5：x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜=n Print x End SubD．Private Sub Command1_Click( ) n=5：x=1：i=l Dox=x*i i=i+1 Loop While i＞n Print x End Sub
考题
在窗体中添加一个名称为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．10B．30C．40D．50
考题
有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为A．0 0B． 1 1C．2 2D．1 2
考题
以下能够正确计算n! 的程序是( )。A．Private Sub Command1_Click( ) n=5:x=l Do x=x*i i=i+1 Loop While i ＜ n Print x End SubB．Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i ＜ n Print x End SubC．Private Sub Command1_Cliek( ) n:5:x=1:i=1 Do x=x* i i:i+1 Loop While i ＜ = n Print x End SubD．Private Sub Command1_Cliek( ) n=5:x:1:i=1 Do x=x*i i=j+1 Loop While i ＞ n Print x End Sub
考题
有如下一个Sub过程： Sub mlt(ParamArray numbers()) n=1 For Each x In numbers n=n*x Next x Print n End Sub 在一个事件过程中如下调用该Sub过程： Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 该程序的运行结果为( )。A．12B．24C．36D．48
考题
在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command12_Click() Tt 3 End Sub Sub Tt(a As Integer) Static X As Integer X=X * a + 1 Print x； End Sub 连续三次单击命令按钮，输出的结果是A．1 5 8B．1 4 13C．3 7 4D．2 4 8
考题
执行下面程序，第一行输出结果是【 】，第二行输出结果是47。Option ExplicitPrivate Sub Form_Click( )Dim A As IntegerA=2Call Sub1 (A) End SubPrivate Sub1 (x As Integer)x=x*2+1If x＜10 ThenCall Sub1 (x)End Ifx=x*2+1Print xEnd Sub
考题
假定有如下的Sub过程： Sub Func(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=6 b=5 Func(a, B) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。A．6 5B．1 1C．1.2 5D．1.2 1
考题
假定有如下的Sub过程：Sub Sub1(x As Single，y As single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_click()Dim a As SingleDim b As Singlea=5b=4Sub1 a，bPrint a；bEnd Sub程序运行后，单击命令按钮，输出结果为A．B．C．D．
考题
假定有如下的Sub过程:Sub Sub1(x As Single, y As single)t=xx=t / yy=t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5b=4Sub1 a,bPrint a;bEnd Sub程序运行后,单击命令按钮,输出结果为A．54B．] 1]]1C．] 1.2]]5.4D．] 1.25]]1
考题
假定有如下的Sub过程：Sub Sub1 (x As Single, y As Single) t=x x = t/y y = t Mod yEnd 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．5 4B．1 1C．1.2 5.4D．1.25 1
考题
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As Integer Private Sub Commandl_click() x＝10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x＝x+20 End Sub Private SubA．10B．30C．40D．50
考题
有如下一个Sub过程： Sub mlt (ParamArray numbers()) n=1 For Each x In numbers n=n * x Next x Print n End Sub在一个事件过程中如下调用该Sub过程： Private Sub Coinmand1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a，b，c，d End Sub 则运行该程序，结果为______。A．12B．24C．36D．48
考题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。A．10B．30C．40D．50
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,A)Print a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．8B．2C．5D．11
考题
以下能够正确计算n!的程序是( )。A．Private Sub Commandl_C1ick()B．hiVate Sub Commandl_C1ick() n＝5:x＝1 n＝5:x=1:i＝1 DO DO X＝x*1 X＝X*1 i＝i＋1 i＝i＋1 Loop while i＜n Loop While＜n Print x Ptinte x End Sub End SubC．Private Sub Commandl_Click ()D．Pdvate Sub Commandl C1ick() n＝5:X＝1:i＝1 n＝5＝:x＝1:i＝1 DO DO X＝X*1 X＝X*1 i＝i＋1 i＝i＋1 Loop While i＞n Print x Print x End Sub End Sub
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．41 54B．2 54C．1 3D．42 3
考题
有如下Sub过程：Sub ind(a As Integer)Static x As Integerx= x + aPrint x：End Sub以下是调用它的事件过程，程序运行后，单击命令按纽Command1三次，输出结果为【 】。Private Sub Command1_Click()Ind 2End Sub
考题
电感为L1的线圈，在正弦电流通过时呈现的感抗为WL1电感中储存的能量为1/2L1i，当正弦电流i的绝对值下降时其磁场能量（）是正弦电流绝对值上升时，磁场能量（）。
热门标签
最新试卷