更多“物体受两个共点力F<sub>1</sub>和F<sub>2</”相关问题
  • 第1题:

    下列子过程语句中正确的是 A.Sub f1(By Val()As Integer) B.Sub f1(n()As Integer)As Integer C.Function f1(f1 As Integer)As Integer D.Function f1(By Val f As Integer)


    正确答案:D
    【解析】Sub过程定义的一般格式如下:
      [PrivateIPublicIFriend][Static]Sub 过程名[(参数表)]
      语句块
      [Exit Sub]
      [语句块]
      End Sub
      其中,Private|Public|Friend说明Sub过程的访问权限,如果没有Private|Public|Friend显式指定,则Sub过程按默认(公用的)访问权限定义。
      参数表含有在调用时要传递给该Sub过程的参数的类型和个数,多个变量则用逗号隔开。参数的格式为:
      [ByVal|ByRef]变量名[()][As数据类型]
      格式中[]里的内容表示可选,变量可以是简单变量或者数组。选项A)中参数没有参数名,所以是错误的;
      Sub过程没有返回值,所以选项B)是错误的。
      Function过程的定义的一般格式如下:
      [Public|Private|Friend][Static]Function过程名[(参数表)][As类型]
      [语句块]
      [过程名=表达式]
      [Exit Function]
      [语句块]
      End Function
      “As类型”是Function过程返回的值的数据类型,如果省略,则默认为Variant.Function函数中参数名不能与函数名相同,因此选项C)错误,选项D)中,省略了返回值类型,是正确的。

  • 第2题:

    在窗体上画一个命令按钮,命名为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则F1返回1,否则返回0。能够正确实现上述功能的代码是 。A.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End FunctionB.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 0 Else F1= 1 End If End FunctionC.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 1 Else F1= 0 End If End FunctionD.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function


    正确答案:B
    【解析】本题综合考查了InputBox函数、块结构条件语句、Function函数过程等多个知识点。B项是正确选项,“Mod”表示取模,当b可以被2整除时,F1返回0,表示b为偶数时,F1返回0。这与题目要表达的意思一致。A、D项使用的Return关键字是错误的,它不能把相应的数值赋给F1。C项的功能与题目要实现的功能恰好相反,表示输入的数值为偶数时,F1返回1,故不正确。

  • 第3题:

    下面子过程说明合法的是( )。

    A、Sub f1(ByVal n%())

    B、 Sub f1(%)As integer

    C、 Function f1%(f1%)

    D、 Function f1(ByVal n%)


    参考答案D

  • 第4题:

    在窗体上画一个命令按钮,命名为CommandI。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程 F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。 能够正确实现上述功能的代码是

    A.Privme Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

    B.Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function

    C.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function

    D.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1 (Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function


    正确答案:B
    解析:本题综合考查了InputBox函数、块结构条件语句、Function函数过程等多个知识点。B项是正确选项,“Mod”表示取模,当b可以被2整除时,F1返回0,表示b为偶数时,F1返回0。这与题目要表达的意思一致。A、D项使用的Return关键字是错误的,它不能把相应的数值赋给 F1。C项的功能与题目要实现的功能恰好相反,表示输入的数值为偶数时,F1返回1,故不正确。

  • 第5题:

    下面子过程语句说明合法的是

    A.Sub f1(s1 As String*8)

    B.Sub f1(n()As Integer)As Integer

    C.Function f1(f1 As Integer)As Integer

    D.Function f1(By Val n As Integer)


    正确答案:D
    解析:选项A中,在定义Sub过程时,形参不能用定长字符串变量或定长字符串数组作为形式参数:选项B中,过程名不能被指定其数据类型:选项C中,函数名与形参名不能同名。只有选项D是正确的。

  • 第6题:

    下列子过程语句中正确的是( )。

    A.Sub f1(ByVal() As Integer)

    B.Sub f1(n() As Integer)As Integer

    C.Function f1(f1 As Integer)As Integer

    D.Function f1(ByVa1 f as Integer)


    正确答案:D
    解析:Sub过程定义的一般格式如下:[Private|Public|Friend][Sratic]Sub过程名[(参数表)]语句块[ExitSub][语句块]EndSub其中,Private|Public|Friend说明Sub过程的访问权限,如果没有Privge|Public|Friend显式指定,则Sub过程按缺省(公用的)访问权限定义。参数表含有在调用耐要传递给该Sub过程的参数的类型和个数,多个变量则用逗号隔开。参数的格式为:[ByVal|ByRef]变量名[()][As数据类型]格式中[]里的内容表示可选,变量可以是简单变量或者敷组。选项A中参数没有参数名,所以是错误的;因为Sub过程没有返回值,所以选项B是错误的。Function过程的定义的一般格式如下:[Public|private|Friend][Static]Function过程名[(参数表)][As类型][语句块](过程名=表达式)[ExitFunction][语句块]EndFunction“As类型”是Function过程返回的值的数据类型,如果省略,则默认为Variant。Function函数中参数名不能与函数名相同,因此选项C错误;选项D中省略了返回值类型,是正确的。

  • 第7题:

    下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch:Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch,k,1) Next k ch=s End Sub A.ABCDEF B.FEDCBA C.A D.F


    正确答案:C

  • 第8题:

    设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下: Private Sub Command1_Click( ) Dim a As Integer a=10 Call g(Form2,A ) End Sub Private Sub g(f As Form,x As Integer) y=IIf(x>10,000,-100) f.Show f.Caption=y End Sub运行以上程序,正确的结果是

    A.Form1的Capdon属性值为100

    B.Form2的Caption属性值为-100

    C.Form1的Caption属性值为-100

    D.Form2的Capdon属性值为100


    正确答案:B
    解析:此题单击命令按钮后将调用g()函数,观察该函数,是显示窗体f,并且将该窗体的标题设置为y,而y的值要通过IIf语句来判断,此题中第一个实参为 Form2,将x=10带人判断语句为结果为-100,因此执行命令后Form2的标题为-100,所以选项B正确。

  • 第9题:

    在窗体中添加一个命令按钮,编写如下程序:

    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为表达式按值传送。参数的传值方式和传址方式的区别。

  • 第10题:

    下列子过程语句的说明正确的是( )。

    A.Sub f1(ByVal x()As Integer)

    B.Sub f1(x%())As Integer

    C.Function f1%(f1%)

    D.Function f1%(x As Integer)


    正确答案:D
    解析:选项A中,形式参数为数组,但数组不能作为值传递方式;选项B中,Sub过程不能有返回值:选项C中的参数和函数名相同是不允许的;选项D中对于过程的定义是正确的。

  • 第11题:

    下列程序运行后的输出结果是______。

    Private Sub f(k,s)

    s=1

    For j=1 To k

    s=s*j

    Next

    End Sub

    Private Sub Command1_Click()

    Sum=0

    For i=1 To 3

    Call f(i,s)

    Sum=Sum+s

    Next

    Print Sum

    End Sub


    正确答案:9
    9 解析:本题考查的重点是在子过程的调用过程中,虚实参数的传送问题,变量s按十传送。子过程f()求n!,sum的计算过程为1!+2!+3!=1+2+6=9

  • 第12题:

    单选题
    A

    <p>I<sub>2</sub>=I<sub>3</sub></p>

    B

    <p>I<sub>2</sub>=4I<sub>3</sub></p>

    C

    <p>I<sub>2</sub>=2I<sub>3</sub></p>

    D

    <p>I<sub>3</sub>=4I<sub>2</sub></p>


    正确答案: D
    解析:

  • 第13题:

    (33)下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.Function f1l%(f1%) D.Function f1%(x As Integer)


    正确答案:D
    【解析】选项A)中,形式参数为数组,但数组不能作为值传递方式;选项B)中,Sub过程不能有返回值;选项C)中的参数和函数名相同是不允许的;选项D)中对子过程的定义是正确的。

  • 第14题:

    在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

    Private Sub f(ByVal x As Integer)

    x=x+4

    End Sub

    Private Sub Command1_Click()

    i=3

    Call f(i)

    If i>4 Then i=i*2

    End Sub

    窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。


    正确答案:3
    3 解析: 本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对x的任何更改不会影响调用它的实参i,所以执行完callf(i)这条语句后i的值不变仍为3,当然也不满足If语句的条件,故此最后输出结果为3。

  • 第15题:

    如下图所示的两个窗体:

    要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体,第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是

    A.Private Sub Command1 Click() Form2.Show 1 End Sub Private Sub Command2_Click()End End Sub

    B.Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End Sub

    C.Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End Sub

    D.Private Sub Command1_Click()Show 1, Form2 End SubPrivate Sub Command2_Click() End End Sub


    正确答案:A
    解析:此题考查的多窗体的操作,用Show方法可以显示指定窗体。其格式为:【窗体名称.】Show【模式】如果省略窗体名称,表示是当前窗体,此题本意是利用窗体1中的命令按钮来控制显示窗体2,故应该使用Form2.Show语句;而“模式”参数为可选项,可取0、1两种值,模式为1时,表示窗体是“模式”窗体,即程序运行时只能对此窗体设置或操作,对其他窗口的操作不起作用;而模式为0时,即可同时操作多个窗口;综上所述只有选项A的事件过程正确;选项B没有指定Form2窗体,所以不正确;选项C与选项B的错误一样;选项D语句语法不对,对方法的引用,窗体应放在方法前面。

  • 第16题:

    有如下程序: Private Sub Form_Click() E=1:F=1 For j=1 To 3 E=E+F:F=F+E Next Print E:F End Sub 该程序的输出结果是

    A. 6 6

    B. 5 8

    C.13 21

    D.34 55


    正确答案:C
    解析:阅读本题程序可以看出,E或F的值总是它前边E和F值的和,E和F的值顺序分别为1、1,2、3,5、8,13、21,可以很容易地用前两个数相加得到后一个数。第1次循环E和F的值分别为2和3,第2次循环E和F的值分别为5和8,第3次循环E和F的值分别为13和21,最后输出结果为13和21。

  • 第17题:

    设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下: Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2,A)End Sub Private Sub g(f As Form, x As Integer) y=IIf(x>10, 100,-100) f.Show f.Caption =y End Sub 运行以上的程序,正确的结果是

    A.Forml的Caption属性值为100

    B.Form2的Caption属性值为-100

    C.Forml的Caption属性值为-100

    D.Form2的Caption属性值为100


    正确答案:B
    解析:本题考查了窗体参数在Sub过程中的使用。根据定义的g Sub过程,当参数x值大于10时,y取值100,否则取值-100,然后再把y值赋给窗体f的Caption属性。在事件过程中调用此过程的实参分别为Form2与a(其中a被赋值为10)。由于a=10,故y=-100,所以正确的结果为:Form2的Caption属性为-100。B项正确。

  • 第18题:

    有如下程序:

    Private Sub Form_Click()

    E=1:F=1

    For j=1 To 3

    E=E+F:F=F+E

    Next

    Print E;F

    End Sub

    该程序的输出结果是

    A.6 6

    B.5 8

    C.13 21

    D.34 55


    正确答案:C
    解析:阅读本题程序可以看出,E或F的值总是它前边E和F值的和,E和F的值顺序分别为1、1,2、3,5、8,13、21,可以很容易地用前两个数相加得到后一个数。第1次循环E和F的值分别为2和3,第2次循环E和F的值分别为5和8,第3次循环E和F的值分别为13和21,最后输出结果为13和21。

  • 第19题:

    在窗体中有一个名为run34的命令按钮,事件代码如下: Private Sub run34_Click( ) f1=1 f2=1 For n=3 T0 7 F=f1+f2 f1=f2 f2= f Next n MsgBox f End Sub 打开窗体,单击命令按钮,消息框的输出结果是( )。

    A.8

    B.13

    C.21

    D.其他结果


    正确答案:B
    按代码逻辑依次代入得n=3,f=1+1=2,fl=1,f2=2;n=4,f=3,fl=2,f2=3;n=5;f=5,fl=3,f2=5;n=6,f=8,fl=5,f2=8,n=7,f=13,fl=8,f2=13。

  • 第20题:

    在窗体中有一个名为run34的命令按钮,事件代码如下:

    Private Sub run34_Click( )

    f1=1

    f2=1

    For n=3 T0 7

    F=f1+f2

    f1=f2

    f2= f

    Next n

    MsgBox f

    End Sub

    打开窗体,单击命令按钮,消息框的输出结果是( )。

    A.8

    B.13

    C.21

    D.其他结果


    正确答案:B
    按代码逻辑依次代入得n=3,f=1+1=2,fl=1,f2=2;n=4,f=3,fl=2,f2=3;n=5;f=5,fl=3,f2=5;n=6,f=8,fl=5,f2=8,n=7,f=13,fl=8,f2=13。

  • 第21题:

    在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click() Print "Visual"; End Sub Private Sub Command2_Click() Print "Basic"; End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后,按键盘Cancel键,在窗体上输出的结果是

    A.Basic

    B.Visual

    C.Cancel

    D.True


    正确答案:B
    解析:窗体中只能有一个CommandButton控件为取消按钮。当一个CommandButton控件的Cancel属性被设置为Tree时,窗体中其他CommandButton控件的Cancel属性自动地被设置为False。当CommandButton控件的Cancel属性被设置为True,而且当前窗体处于活动状态时,按Cancel键可以触发该按钮Click事件,而不管该控件是否获得焦点。本题开始时Command2的Cancel属性为,True,但随后由于Command1的该属性变为True,Command2的Cancel属性变为False,因此按Cancel键后执行Command1_Click过程。

  • 第22题:

    在窗体中添加一个命令按钮,编写如下程序: 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为表达式按值传送。

  • 第23题:

    单选题
    变直径圆管流,细断面直径d1,粗断面直径d2=2d1,粗细断面雷诺数的关系是(    )。
    A

    <p>Re<sub>1</sub>=0.5Re<sub>2</sub></p>

    B

    <p>Re<sub>1</sub>=Re<sub>2</sub></p>

    C

    <p>Re<sub>1</sub>=1.5Re<sub>2</sub></p>

    D

    <p>Re<sub>1</sub>=2Re<sub>2</sub>         </p>


    正确答案: D
    解析: 暂无解析

  • 第24题:

    多选题
    在过程控制中,若TL=-3,Tu=3,u=1,σ=1,则(  )。
    A

    C<sub>P</sub>=1    

    B

    C<sub>P</sub>=2/3      

    C

    C<sub>Pk</sub>=1  

    D

    C<sub>Pk</sub>=2/3


    正确答案: C,D
    解析: 暂无解析