一轴由一对7211AC的轴承支承，Fr1=3300N，Fr2=1000N，Fx=900N，如图。试求两轴承的当量动载荷P。（S=0.68Fr，e=0.68，X=0.41，Y=0.87）

题目

一轴由一对7211AC的轴承支承，Fr₁=3300N，Fr₂=1000N，F_x=900N，如图。试求两轴承的当量动载荷P。（S=0.68Fr，e=0.68，X=0.41，Y=0.87）

相似考题

1.（ 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

2.如图所示，轴的支承为一对型号相同的圆锥滚子轴承，正装。已知：FR1=4000N，FR2=5500N，Fa=2500N，试求当量动载荷 Pr1和 Pr2各为多少?注：该轴承的有关参数如下： e=0.34，Y=1.5，内部轴向力 S=FR/2Y;当 FA/FR≤e 时：X=1，Y=0;当 FA/FR>e 时：X=0.4，Y=1.5。

3.以下过程的定义中,( )是错误的。A、Public Sub Sum(x ; y)B、Public Sub Sum(ByVal x, ByVal y)C、Public Sub Sum(x As Integer,y As Integer)D、Public Sub Sum(x%, y%)

4.某轴的支承为一对型号为 6308 的深沟球轴承，两端单向固定。已知：两支承上的径向载荷分别为 FR1=1000N，FR2=2000N，轴向载荷 Fa=350N 并指向轴承1，试计算该对轴承的当量动载荷 Pr1和 Pr2 各为多少？校核轴承寿命时应选用哪一个当量动载荷进行计算？注：该轴承的有关参数如下： e=0.198，Cr=32000N；当 FA/FR≤e 时：X=1，Y=0；当 FA/FR＞e 时：X=0.56，Y=2.30。

更多“一轴由一对7211AC的轴承支承，Fr1=3300N，Fr2=1000N，Fx=900N，如图。试求两轴承的当量动载荷P。（S=0.68Fr，e=0.68，X=0.41，Y=0.87）<img src="//img.examk.com/exam/m/u/f5Th8rF3ddpz9EitESP2LT7nGh84vaTM.jpg">”相关问题

第1题：

下面各被调用函数首部书写正确的是( )
A．void sub(float x；float y)；
B．void sub(float x，y)
C．void sub(float x，float y)
D．void sub(float x，float y)；

正确答案：C
第2题：

如图所示一对角接触向心球轴承，已知轴承的径向载荷分别为Fr1=2200N，Fr2=2000N，作用在轴上的轴向的外载荷Ka=1000N，且附加轴向力F′=0.7Fr，e=0.68。
(1)试标出两端轴承的附加轴向力F1′、F2′的方向
(2)计算轴承的当量动载荷P1和P2。

参考答案：
第3题：

有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
A．0 0
B． 1 1
C．2 2
D．1 2

正确答案：B
解析：考查考生对调用通用过程的掌握情况。
[解题要点] 调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程。因为在默认的情况下，变量都是通过“引用”传送给sub1过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值。过程Sub1的形参获得a，b的地址，此时x=5，y=4，在过程Sub1中，将x，即5的值赋给t，而将t\y的值赋给x，将t除以y的余数赋给y，此时x,y的值为1,1。
[错解分析] 调用通用过程可以返回多个参数值。
[考点链接] 过程调用、参数传递。
第4题：

假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下： Public X As Integer Public Y As Integer Sub S1（） x=1 S2 End Sub Sub S2（） y=10 Form1．Show End Sub Model2的代码如下： Sub Main（） S1 End Sub 其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是（）。
A.Form1→Model1→Model2
B.Model1→Model2→Form1
C.Model2→Model1→Form1
D.Model2→Form1→Model1

正确答案：C
C。【解析】本题考查VisualBasic程序执行过程中各模块和窗体的调用过程。按照本题中代码执行，首先程序调用执行Model2，Model2中调用s1，s1数组属于Model1模块，Model1会调用s2，s2致使Form1执行，可以得出正确答案为选项C。
第5题：

假定有如下的Sub过程： Sub S(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=2 S a,b print a,b End Sub 程序运行后，单击命令按钮，输出结果是( )。
A．5 2
B．1 1
C．1.25 4
D．2.5 1

正确答案：D
第6题：

编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是
A．rehcaet
B．tahreee
C．themee
D．eerthea

正确答案：A
解析：可以看出，Sub1(ByValx1AsString，y1AsString)的作用是将参数x1的字符逆序处理，然后赋给y1，而y1是传址引用的，可以直接返回处理结果。
第7题：

假定有如下的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值。
第8题：

当发生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 Sub
A．7 75 66 60 7 80 126 60
B．7 75 66 60 7 75 126 60
C．7 75 66 60 7 80 66 60
D．7 75 66 60 7 75 66 60

正确答案：A
解析：本题定义了两个窗体级变量m和n，并在窗体的Load事件中给窗体级变量m和n分别赋值7和70。当发生Form_Click事件时，首先进行第一次sub1过程的调用，把k的值6按地址传递给形参x，把p的值60按值传递给形参y。在sub1中定义了一个局部变量m，因此在该函数中使用的m是局部变量而非窗体级变量。执行下面的4条赋值语句后，窗体级变量n的值为75，局部变量m的值为142，形参x的值为66，形参y的值为126。函数调用返回后，由于p是按值传递，所以它的值没有变化，k是按地址传递，所以它的值变为邱，输出m、n、k和p的值分别是7、75、66和60。同理，分析第二次sub1过程调用，可知过程调用返回后，变量m、n、k和p的值分别是7、80、126、60。
第9题：

有如下程序： Private Sub Command1 Click() Dim a As Single Dim b As Single a=5：b=4 Call S(a，B)End Sub Sub S(x As Single，y As Single) t=x x=t\y y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
A．0 0
B．1 1
C．2 2
D．1 2

正确答案：B
解析：调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程；因为在默认的情况下，变量都是通过“引用”传送给S过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值；过程S的形参获得a，b的地址，此时x=5，y=4，在过程S中，将x，即5的值赋给t，而将t\y的值赋给x。将t除以y的余数赋给y，此时x，y的值为l，1。
第10题：

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．41 54
B．2 54
C．1 3
D．42 3

正确答案：B
解析：在Function((参数表列))过程中，“参数表列”指明了调用时传送给过程的参数类型和个数，每个参数的格式为：[ByVal][ByRef]变量名[()][As数据类型]其中系统默认为ByRef，它指明参数传送是以传地址进行的，实际参数变量的值会由于过程中对形参的操作而改变。而ByVal则不同，参数传送，是以传值传送的，实际参数变量的值不再由于过程中对形参的操作而改变，本题目中过程sub1的参数n是传地址引用，而参数m是传值引用，因此x的值改变，x=21\10+1=2；而y值不改变，仍为54。答案为选项B。
第11题：

一对30205/P6的圆锥滚子轴承的轴系，轴上径向载荷F_R=3000N，F_A=500N，尺寸关系如图所示，求两轴承的径向当量动载荷P_r1、P_r2。（30205轴承：派生轴向力F_S=F_r/（2Y），e=0.35，当F_a/F_r≤e时，X=1，Y=0；当F_a/F_r≥e时，X=0.4，Y=1.7）

略
第12题：

下列定义abc过程的语句，正确的是（）
- A、Dim Sub abc（x，y）
- B、Public abc（x，y）
- C、Private Sub abc（x，y）As Integer
- D、Sub abc（x，y）
正确答案:D
第13题：

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
A．10
B．30
C．40
D．50

正确答案：B
解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。
第14题：

有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m &"*”：n=n&"#" Print x，y，m，n End Sub 程序运行后，输出的结果是
A．1 1 * #
B．1 1 * #
C．1 1 * # 1 1 * # 1 2 * #
D．1 1 * # 1 1 * ## 1 2 * ##

正确答案：D
解析：当i=1时，调用函数过程DS，由于y，n为静态变量值保存，执行x=x+1；y=y+1后x=1，y=1执行m=m&"*"：n=n&"#"后，m="*"，n="#"；当I=2时同上，只是y=2，n="##"。输出结果如选项D)所示。
第15题：

若有以下变量和函数说明:includecharCh='*';void sub(int x,int y,char ch,double*

若有以下变量和函数说明： #include＜iostream.h＞ charCh='*'； void sub(int x，int y,char ch，double*Z) { switch(ch) { case'+':*Z=x+y;break； case'-':*Z=x-y;break： case'*':*Z=x*y;break； case'/':*z=x/y;break： } } 以下合法的函数调用语句是( )。
A．sub(10，20，Ch，y)；
B．sub(1.2+3，2*2，'+'，&Z)；
C．sub(sub(1，2，'+'，&y)，sub(3，4'+'，&x)，'-'，&y)；
D．sub(a，b，&x,ch)；

正确答案：B
第16题：

假定有如下的Sub过程： Sub S(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 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为 ______ 。
A．5 4
B．1 1
C．1.25 4
D．1.25 1

正确答案：D
解析：Visual Basic的函数参数默认的方式是传地址的，所以函数S对参数做的改变会反映到原来的变量里。
第17题：

有如下事件过程： Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer，m As String Static y，n x=x + 1 y=y + 1 m=m&"*"：n=n &"#" Print x，y，m，n End Sub 程序运行后，输出的结果是
A．1 1 * # 1 1 * #
B．1 1 * # 1 2 * #
C．1 1 * # 1 1 * ##
D．1 1 * # 1 2 * ##

正确答案：D
解析：本题考查函数调用和输出格式的语句。当I=1时，调用函数过程DC，由于y，n为静态变量值保存，执行x=x+1；y=y+1后x=1，y=1；执行m=m&"*"：n=n&"#"后，m="*"，n="#"；当I=2时同上，只是y=2，n="##"。
第18题：

有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a,B)End Sub Sub Subl(x As Single, y As Single) t=x x=t\y y = t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
A．0 0
B．1 1
C．2
D．1 2

正确答案：B
解析：调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程；因为在默认的情况下，变量都是通过“引用”传送给Sub1过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值；过程 Sub1的形参获得a，b的地址，此时x=5，y=4，在过程 Sub1中，将x，即5的值赋给t，而将t\y的值赋给x，将t除以y的余数赋给y，此时x，y的值为1，1。注意：调用通用过程可以返回多个参数值。注意：过程调用、参数传递
第19题：

在窗体上画一个名称为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 3
B．7 4 2
C．6 4 2
D．4 6 3

正确答案：B
解析：本题考察的是函数过程的调用和参数传送。当发生了Command1的单击事件时，调用函数过程sub1，虽然sub1函数过程在定义时3个参数都被定义成传址方式传送，但在调用时只有第1个参数是变量，按引用传送，其他两个参数均按传值传送。参数传送后，进入subl函数过程执行，p、m和n均加1分别得到的值为7、6和3。函数过程调用返回后，只有x的值发生了变化，变为7，y和z的值仍为4和2。
第20题：

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
A．10
B．30
C．40
D．50

正确答案：B
解析：本题考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为10，然后依次调用s1和s2；在s1中对x自加了20；在s2中用Dim定义了一个局部变量x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。
第21题：

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,A)Print a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．8
B．2
C．5
D．11

正确答案：A
解析：因为sub1过程的形参都是传值传送，所以在其内的所有计算结果都将不返回，并不影响对应的实参值，变量a的值并没有改变，仍旧是8。
第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题：

以下定义的过程（）是按“传值”方式传递参数的。
- A、Public Sub Sum(x,y)
- B、Public Sub Sum(ByVal x, ByVal y)
- C、Public Sub Sum(x As Integer,y As Integer)
- D、Public Sub Sum(x%, y%)
正确答案:B

一轴由一对7211AC的轴承支承，Fr1=3300N，Fr2=1000N，Fx=900N，如图。试求两轴承的当量动载荷P。（S=0.68Fr，e=0.68，X=0.41，Y=0.87）

题目

相似考题

更多“一轴由一对7211AC的轴承支承，Fr<sub>1</sub>=3300N，Fr<sub>2</sub>=1000N，F<sub>x</sub>=900N，如图。试求两轴承的当量动载荷P。（S=0.68Fr，e=0.68，X=0.41，Y=0.87）<img src="//img.examk.com/exam/m/u/f5Th8rF3ddpz9EitESP2LT7nGh84vaTM.jpg">”相关问题

相关内容