更多“一个力的大小为36N,它的一个分力F<sub>1</sub>与”相关问题
  • 第1题:

    在窗体上画一个命令按钮,命名为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,故不正确。

  • 第2题:

    窗体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···


    正确答案:B
    B。【解析】窗体单击事件为Form—Click事件。

  • 第3题:

    有如下一个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.12

    B.24

    C.36

    D.48


    正确答案:B

  • 第4题:

    假定有如下的Sub过程:

    Sub Sub1(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

    Sub1 a,b

    Print a;b

    End Sub

    程序运行后,单击命令按钮,输出结果为

    A.

    B.

    C.

    D.


    正确答案:D
    解析:在调用通用过程时要注意的是参数的传递方式。本题中两个变量都是以传值方式传递。根据传值方式的定义不难计算出本题结果。

  • 第5题:

    设一个工程由两个窗体组成,其名称分别为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正确。

  • 第6题:

    有如下一个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.12

    B.24

    C.36

    D.48


    正确答案:B

  • 第7题:

    在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框,并把窗体的 KeyPreview 属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_ Load () Show Text1.Text = " " TextSetFocus End Sub Private Sub Command1 Click() TextText= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后,在键盘上输入ABCDEFG,单击命令按钮,则文本框中显示的内容为 ______。

    A.abodefg

    B.不显示任何信息

    C.ABCDEFG

    D.出错


    正确答案:B

  • 第8题:

    将一个力F="10"N分解为两个分力,已知一个分力的方向与F成30°角,另一个分力的大小为6N,则在分解中()

    • A、有无数组解
    • B、有两解
    • C、有惟一解
    • D、无解

    正确答案:B

  • 第9题:

    将力F分解为两个分力,已知其中一个分力F1的方向与F的夹角为一锐角θ,则()

    • A、只要知道另一个力的方向,就可得到确定的两个分力
    • B、只要知道F1的大小,就可得到确定的两个分力
    • C、如果知道另一个分力的大小,就可得到唯一确定的两个分力
    • D、另一个分力的最小值是F1sinθ

    正确答案:A,B

  • 第10题:

    把一个力F分解为两个分力,使其中一分力的数值等于F,则()

    • A、另一个分力数值必也为F
    • B、两分力的夹角必为120°
    • C、另一个分力的数值必大于F
    • D、两分力的夹角必大于90°。

    正确答案:D

  • 第11题:

    两个力F1 和 F2间的夹角为θ,θ≤180°,两个力的合力为F,以下说法正确的是()

    • A、若F1 和 F2大小不变,θ角越小,合力F就越大
    • B、合力F总比分力中的任何一个力都大
    • C、如果夹角θ不变,F1大小不变,只要F 2 增大,合力F就必然增大
    • D、合力F可能比分力中的任何一个力都小

    正确答案:A,D

  • 第12题:

    两个力的合力大小一定大于它的任意一个分力的大小。


    正确答案:错误

  • 第13题:

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

  • 第14题:

    在窗体上画一个命令按钮,命名为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,故不正确。

  • 第15题:

    设一个工程由两个窗体组成,其名称分别为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项正确。

  • 第16题:

    假定有如下的Sub过程:

    Sub Sub1(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

    Sub1 a,b

    Print a;b

    End Sub

    程序运行后,单击命令按钮,输出结果为

    A.54

    B.] 1]]1

    C.] 1.2]]5.4

    D.] 1.25]]1


    正确答案:D
    解析:Sub过程与Function过程最根本的区别是:Sub过程的过程参数名称不能有返回值,而Function过程能通过过程名称得到返回值。

  • 第17题:

    假定有如下的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 4

    B.1 1

    C.1.2 5.4

    D.1.25 1


    正确答案:D
    解析:本题重点是在子过程的调用过程中,虚实参数的传送问题,变量a和b按址传送,返回子过程的x和y值。

  • 第18题:

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

  • 第19题:

    窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是

    A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()

    End Sub End Sub

    C)Private Sub Commandl_Click() D)Private Sub Command_ Click()

    End Sub End Sub


    正确答案:B

  • 第20题:

    将一个力F分解为两个不为零的力,下列分解方法中不可能的是()

    • A、分力之一垂直于F
    • B、两个分力与F都在一直线上
    • C、一个分力的大小与F的大小相同
    • D、一个分力与F相同

    正确答案:D

  • 第21题:

    将一个已知力F分解为两个力,按下列条件可以得到唯一结果的有()

    • A、已知两个分力的方向(并且不在同一直线上)
    • B、已知两个分力的大小
    • C、已知一个分力的大小
    • D、已知一个分力的大小,另一个分力的方向

    正确答案:A

  • 第22题:

    将一个力分解为两个分力,合力与分力的关系是()

    • A、合力的大小一定等于两个分力大小之和
    • B、合力的大小可能比每一个分力都大,也可能比每一个分力都小
    • C、合力的大小不可能小于每一个分力的大小
    • D、合力的大小可能比一个分力大,也可能比一个分力小

    正确答案:B,D

  • 第23题:

    过程通过参数传递将一个参数传递给子过程A,并返回一个结果,下列子过程定义中正确的是()

    • A、Sub A(m+1,n+2)
    • B、Sub A(ByValm!,ByValn!)
    • C、Sub A(ByValm!,n+2)
    • D、Sub A(ByValm!,n!)

    正确答案:D