互成角度的两个力F1、F2合成，得合力F；关于F1、F2和它们合力F关系，下列说法中正确的是（）A、F1、F2中一个力增大，合力一定增大B、F1、F2中一个力减小，合力一定减小C、F1、F2都增大，合力一定增大D、F1、F2都增大，合力可能不变

题目

互成角度的两个力F₁、F₂合成，得合力F；关于F₁、F₂和它们合力F关系，下列说法中正确的是（）

A、F₁、F₂中一个力增大，合力一定增大
B、F₁、F₂中一个力减小，合力一定减小
C、F₁、F₂都增大，合力一定增大
D、F₁、F₂都增大，合力可能不变

相似考题

1.下面的子过程语句说明合法的是________。A.Sub fib(ByRef i%())B.Sub fib(j%) As IntegerC.Functionf%(f%)D.Function f1!(ByValn%)

2.在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVa1 x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(1)If i＞4 Then i=i*2MsgBox iEnd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为______。

3.下面子过程语句说明合法的是( )。A．Function f1(By Valn%)B．Sub f1(n%)As IntegerC．Function f1%(f1%)D．Sub f1(ByValn%())

4.（ 11 ）在窗体中有一个名为 command 的命令按钮， click 事件的代码如下：private sub command1_click()f=0for n=1 to 10 step 2f=f+nnext nme!lb1.caption=fend sub单击命令按钮后，标签显示的结果是 ___[11]___ 。

更多“互成角度的两个力F1、F2</”相关问题

第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题：

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

如下图所示的两个窗体：
要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为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语句语法不对，对方法的引用，窗体应放在方法前面。
第5题：

有如下程序： 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。
第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
I2=I3
B
I2=4I3
C
I2=2I3
D
I3=4I2

正确答案： 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题：

有如下程序：
Private Sub Form_C1ick()
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。
第15题：

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

A、Sub f1(ByVal n%())
B、 Sub f1(%)As integer
C、 Function f1%(f1%)
D、 Function f1(ByVal n%)

参考答案D
第16题：

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

下面子过程语句说明合法的是
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是正确的。
第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
Re1=0.5Re2
B
Re1=Re2
C
Re1=1.5Re2
D
Re1=2Re2 

正确答案： D
解析：暂无解析
第24题：

多选题
在过程控制中，若TL=-3，Tu=3,u=1,σ=1,则(　　)。
A
CP=1
B
CP=2/3
C
CPk=1
D
CPk=2/3

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

题目

相似考题

更多“互成角度的两个力F<sub>1</sub>、F<sub>2</”相关问题

相关内容