F1、F2是力F的两个分力。若F＝10N，则下列不可能是F的两个分力的是（）A、F1＝10N，F2＝10NB、F1＝20N，F2＝20NC、F1＝2N，F2＝6ND、F1＝20N，F2＝30N

题目

F₁、F₂是力F的两个分力。若F＝10N，则下列不可能是F的两个分力的是（）

A、F₁＝10N，F₂＝10N
B、F₁＝20N，F₂＝20N
C、F₁＝2N，F₂＝6N
D、F₁＝20N，F₂＝30N

相似考题

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是力F的”相关问题

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

设有如下程序： Private Sub Form. Click（） Dim s As Long，f As Long Dim n As Integer，i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后，单击窗体，输出结果是（）。
A.32
B.33
C.34
D.35

正确答案：B
B。【解析】本题考查For循环，当f=1时，i=1，计算f=f*i=1*1=1；S=S十f=0十1=1，循环继续，当i=2时，f=f*i=1*2=2，S=s+f=1+2=3，循环继续，当i=3时，f=f*i=2*3=6，S=s+f=3+6=9，循环继凄，当i=4时，f=f*i=6*4=24，S=s+f=9+24=33，所以最后输出结果为33，答案选择B。
第5题：

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

下面子过程语句说明合法的是
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是正确的。
第7题：

有如下程序:
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。
第8题：

在窗体中有一个名为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。
第9题：

在窗体中有一个名为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。
第10题：

在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim x As integer Static y As integer x=10 y=5 Call f1(x，y) Print x，y End Sub Private Sub f1(ByRef xl As Integer，y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．10 5
B．12 5
C．10 7
D．12 7

正确答案：D
解析：传地址方式一般用ByRef表示，形参在默认情况下也是以传地址的方式传送参数。本题中F1子过程的x1与y1参数都是传地址的方式。这就意味着在调用该过程后，实参的数值会使着过程内的相关处理而发生变化。本题单击一次按钮后，实参x加2，变为12，实参y加2，变为7，当再次输出x与y时，x与y的值已不再是10与5，而是变为12与7。
第11题：

单选题
变直径圆管流，细断面直径d1，粗断面直径d2=2d1，粗细断面雷诺数的关系是（）。
A
Re1=0.5Re2
B
Re1=Re2
C
Re1=1.5Re2
D
Re1=2Re2 

正确答案： D
解析：暂无解析
第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题：

设有如下程序： Private Static Function Fac(n As Integer)As Integer Dim f As Integer f=f+n Fac=f End Function Private Sub Form_Click( ) Dim I As Integer For 1=2 To 3 Print"#"；I&“=”&Fac(1) Next I End Sub 程序运行后，单击窗体，在窗体上显示的是
A．#2=2 #3=3
B．#2=2 #3=5
C．#；2=2 #；3=3
D．#；2=2 #3；=5

正确答案：B
解析：由于Print方法中的分号表示前后字符之间的连接，并不显示在窗体中，同时由于Function过程以Static定义，在I=3时，Fac(1)的值为5。
第17题：

有如下程序： 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。
第18题：

下列子过程语句中正确的是( )。
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中省略了返回值类型，是正确的。
第19题：

下面程序的输出结果是。 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
第20题：

若有如下程序： float sub(int a，int b) { return(a*b)； } main() {int i=1，j=2，k=3； printf("%4.0f\n"，sub((int)sub(k+j，j)，k+i))； } 则程序运行后的输出结果是( )。
A．40
B．32
C．16
D．编译出错

正确答案：A
解析：因为函数sub()只是简单地返回两个参数的乘积，所以表达式sub((int)sub(k+j，j)，k+i)展开后就是：(int)((k+j) *j)*(k+i)=((3+2)*2)*(3+1)=10*4=40。所以程序运行后的输出结果是40，应该选择A。
第21题：

下列子过程语句的说明正确的是( )。
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中对于过程的定义是正确的。
第22题：

下列程序运行后的输出结果是______。
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
第23题：

单选题
以下是子过程或函数过程定义中的开始语句，错误的为（）。
A
Private Function f（ x As String ） As Single
B
Private Function f（ x As String ）
C
Private Sub f（ x As String ） As Single
D
Private Sub f（ x As String ）

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

多选题
下列表示中____的表示形式是正确的。
A
U95= 1%,veff =9 
B
Ur= 1%,k=2 
C
uC=0. 5% 
D
uC=±0 5%．k=1 

正确答案： D,B
解析：

F1、F2是力F的两个分力。若F＝10N，则下列不可能是F的两个分力的是（）A、F1＝10N，F2＝10NB、F1＝20N，F2＝20NC、F1＝2N，F2＝6ND、F1＝20N，F2＝30N

题目

相似考题

更多“F<sub>1</sub>、F<sub>2</sub>是力F的”相关问题

相关内容