网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
电荷分布在有限空间内,则任意两点P1、P2之间的电势差取决于()。
- A、从P1移到P2的试探电荷电量的大小
- B、P1和P2处电场强度的大小
- C、试探电荷由P1移到P2的路径
- D、由P1移到P2电场力对单位正电荷所作的功
参考答案
更多 “电荷分布在有限空间内,则任意两点P1、P2之间的电势差取决于()。A、从P1移到P2的试探电荷电量的大小B、P1和P2处电场强度的大小C、试探电荷由P1移到P2的路径D、由P1移到P2电场力对单位正电荷所作的功” 相关考题
考题
单击一次命令按钮后,下列程序的执行结果是( )。 Private Sub Commandl_Click() s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End FunctionA.15B.25C.35D.45
考题
( 25 )要求当鼠标在图片框 P1 中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是A )Private Sub P1_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )Print X,YEnd SubB )Private Sub P1_MouseDown ( Button AS Integer,Shift As Integer,X As Single,Y As Single )Picture.Print X,YEnd SubC )Private Sub P1_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )P1.Print X,YE n d S u bD )Private Sub Form_MouseMove ( Button AS Integer,Shift As Integer,X As Single,Y As Single )P1.Print X,YEnd Sub
考题
阅读程序: Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序,单击命令按钮,输出结果为。
考题
下面程序: Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。A.0B.12C.Str(z)D.显示错误信息
考题
要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是A.Private Sub P1_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single) Print X,Y End SubB.Private Sub P1_M0useDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Picture.Print X,Y End SubC.Private Sub P1_MouscMove(Button As integer,Shift As Integer,X As Single,Y As Single) P1.Print X.Y End SubD.Private Sub Form_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single) P1.Print X.Y End Sub
考题
运行以下程序后,输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function:A. sub:2 6 4 main:1 2 3B. sub:2 6 4 main:2 2 3C. sub:2 6 4 main:2 6 4D. sub:2 6 4 main:1 6 4
考题
设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer … Call D(a) 如下过程定义巾,正确的是( )。A.Private Sub p(a As Integer)B.Private Sub p(a( )As Integer)C.Private Sub p(a(10)As Integer)D.Private Sub p(a(n)As Integer)
考题
下列程序的执行结果是______。PrivateFunctionP(NASInteger)Fori=1 To NSUM=SUM+iNextiP=SUMEnd FunctionPrivte Sub Commandl_Click()S=P(1)+P(2)+P(3)+P(4)Print SEnd Sub
考题
在窗体中添加一个名称为Com1的命令按钮,然后编写如下程序:Private Sub s(ByVal p As Integer)p=p*2End SubPrivate Sub Com1_Click()Dim i As Integeri=3Call s(i)If i>4 Then i=i^2End sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
考题
单击一次命令按钮后,下列程序的执行结果是 Private Sub Command1_Click() s=P(1) +P(2) +P(3) +P(4) Print s End Sub Public Function P(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i P=Sum End FunctionA.15B.25C.35D.45
考题
在代码中定义了—个子过程; Sub P(a,B)… End Sub 下面______调用该过程的格式是正大确的。A.Call PB.Call P 10,20C.Call P(10,20)D.P(10,20)
考题
在窗体中添加一个命令按钮,编写如下程序: Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为A.Sub:2 6 4 Main:2 6 4B.Sub:2 6 4 Main:2 6 4C.Sub:2 6 4 Main:1 2 3D.Sub:2 6 4 Main:2 2 3
考题
有如下函致: Function fact(x As Integer)As Long Dim p As Long,i As Integer p=1 For i=1 To x p=p*1 Next fact=p End Function 调用它的事件过程如下: Private Sub Command1_Click() i=Val(Inputbox("请输入数据")) a=fact((i)) Print a End Sub 若输入数据5,则运行结果为A.120B.60C.80D.100
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub s(ByVal p As Integer)p=p*2End SubPrivate Sub Command1_click()Dim i As Integeri=3Call s(i)If i>4 Then i=i^2MsgBox iEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。
考题
单击一次命令按钮之后,下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S: End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End FunctionA.20B.35C.115D.135
考题
设程序中有如下数组定义和过程调用语句:Dim a(10) as integer……Call p(a)如下过程定义中,正确的是A)Private Sub p(a as integer)B)Private Sub p(a() as integer)C)Private Sub p(a(10) as integer)D)Private Sub p(a(n) as integer)
考题
在窗体中添加一个命令按钮,编写如下程序: 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 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub sub1(p,m,n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x,y+1,(z)) Print x;y;z End Sub 程序运行后,单击命令按钮,则窗体上第二行显示的内容是A.7 6 3B.7 4 2C.6 4 2D.4 6 3
考题
当发生Form_Click事件时,下列程序的输出结果是( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer,p As Integer k=6:p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End SubA.7 75 66 60 7 80 126 60B.7 75 66 60 7 75 126 60C.7 75 66 60 7 80 66 60D.7 75 66 60 7 75 66 60
考题
在窗体中添加一个命令按钮,编写如下程序:Private Sub Sub1(p,m,n)p=p+1:m=m+1:n=n+1Print "sub1:";p;m;nEnd SubPrivate Sub Command1_Click()a1=1:b=2:c1=3Call Sub1(a,b1+3,c1)Print"Main:";a1;b1;c1End Sub程序运行后,输出结果为A.Sub: 2 6 4 Main: 2 6 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
若有如下程序: sub(int * t,int n) {int *p1, *p2; for(p1=t,p2=t;p1-t<n;p1++) if(*p1<*p2) p2=p1; return(*p2);} main() {int a[9]={9,36,19,39,26,5,6,33,15}; printf("%d\n",sub(a,9));} 则程序运行后的输出结果是( )A.5B.9C.15D.39
考题
在窗体中添加一个命令按钮,编写如下程序: 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 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
考题
单选题变直径圆管流,细断面直径d1,粗断面直径d2=2d1,粗细断面雷诺数的关系是( )。A
pResub1/sub=0.5Resub2/sub/pB
pResub1/sub=Resub2/sub/pC
pResub1/sub=1.5Resub2/sub/pD
pResub1/sub=2Resub2/sub /p
考题
单选题A
pIsub2/sub=Isub3/sub/pB
pIsub2/sub=4Isub3/sub/pC
pIsub2/sub=2Isub3/sub/pD
pIsub3/sub=4Isub2/sub/p
考题
多选题下列表示中____的表示形式是正确的。ApUsub95/sub= 1%,vsubeff/sub =9 /pBpUsubr/sub= 1%,k=2 /pCpusubC/sub=0. 5% /pDpusubC/sub=±0 5%.k=1 /p
考题
单选题根据《环境影响评价技术导则大气环境》,以下评价等级正确的是( )A
pPsubmax/sub≥10%为一级评价/pB
pPsubmax/sub≥80%为一级评价/pC
pPsubmax/sub≤10%为三级评价/pD
p 10%≤Psubmax/sub≤80%为二级评价/p
热门标签
最新试卷