在图4-25所示凸轮机构中,已知凸轮以角速度ω逆时针方向转动,令凸轮的基圆半径以r0表示,行程以h表示,偏心距以e表示,压力角以a表示,推杆位移以s表示,凸轮的推程运动角δ0表示,回程运动角δ´0以表示,远休止角以δ´8表示,近休止角以δ´8表示,a为实际廓线推程起始点,b为实际廓线推程终止点,c为实际廓线回程起始点,d为实际廓线回程终止点.试作图表示:
(1)凸轮的基圆并标注其基圆半径r0;
(2)推杆的行程h;
(3)当前位置时的压力角α和位移s;
(4)凸轮的偏心距e;
(5)凸轮的推程运动角δ0、回程运动角δ´0、远休止角δ´8和近休止角δ´8.
第2题
(1)若此时令US1=0,I为多少?
(2)若将US2改为8V,I又为多少?
第3题
第4题
Private Sub Commandl_Click()
If Not Check(Combo 1.Text) Then
MsgBox ("输入错误")
Exit Sub
End If
For k=0 To Combol.ListCount-1
If Combo l .Text=Combol.List(k) Then
MsgBox (" 添加项目失败")
Exit Sub
End If
Next k
Combo 1 .AddItem Combo 1.Text
MsgBox("添加项目成功")
End Sub
Private Function Check(ch As String) As Boolean
n=Len(ch)
for k=1To n
c$=UCase(Mid(ch, k, 1))
If c<"A"Or c>"Z" Then
Check=False
Exit Function
End If
Next k
Check=True
End Function
程序运行时:如果在组合框的编辑区中输入"Java",单击命令按钮后产生的结果是
A)显示“输入错误”
B)显示“添加项目失败”
C) 显示“添加项目成功”
D)没有任何显示
第5题
A.显示“输入错误”
B.显示“添加项目失败”
C.显示“添加项目成功”
D.没有任何显示
第6题
Private,Sub Command1_Click( )
If Not Check(Combo1.Text)Then
MsgBox("输入错误")
Exit Sub
End If
For k=0 To Comb01.ListCount-1
If Comb01.Text=Combo1.List(k)Then
MsgBOX("添加项目失败")
Exit Sub
End If
Next k
Cornbol.AddItem Combo1.Text
MsgBOX("添加项目成功")
End Sub
Private Function Check(ch As String)As Boolean
n=Len(ch)
For k=1 To n
c$=Ucace(Mid(ch,k,1))
If c<"A"Or c>"Z"Then
Check=False
Exit Function
End If
Next k
Check=True
End Function
程序运行时,如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是( )。
A.显示“输入错误”
B.显示“添加项目失败”
C.显示“添加项目成功”
D.没有任何显示
第8题
第9题
第10题
(65)
A. ipconfig /all
B. ping
C. netstat
D. nslookup
(66)
A. 查看当前 TCP/IP 配置 信息
B. 测试到达目的主机的连通性
C. 显示当前所有连接及状态信息
D. 查看当前使用的 DNS 服务器
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!