滚动轴承的程序设计要求

滚动轴承CAD上机实验要求（2009.10.26）1）完成滚动轴承CAD程序设计（具体要求见附）

2）通过比较教材例10-1设计结果，验证程序的正确性3）参数化图形显示滚动轴承结构图（任选一个类型）

附：滚动轴承CAD设计参考程序

！此处添加变量定义

Private Sub Command1_Click()

Form1.Hide

Form2.Show

r1 = Val(Text1.Text)

r2 = Val(Text2.Text)

a = Val(Text3.Text)

d = Val(Text4.Text)

f1 = Val(Text5.Text)

f2 = Val(Text6.Text)

n = Val(Text7.Text)

lh = Val(Text8.Text)

s = Val(Text9.Text)

m = Combo1.Text

'深沟球轴承（GB276-82) d=10~110

aa1(0, 0) = 1.95: aa1(0, 1) = 2.23: aa1(0, 2) = 2.51: aa1(0, 3) = 2.79: aa1(0, 4) = 4.47: aa1(0, 5) = 5.2: aa1(0, 6) = 6.91: aa1(0, 7) = 8.66: aa1(0, 8) = 9.45: aa1(0, 9) = 11.96: aa1(0, 10) = 12.95: aa1(0, 11) = 15.99: aa1(0, 12) = 19.35: aa1(0, 13) = 19.74: aa1(0, 14) = 24.2: aa1(0, 15) = 26.07: aa1(0, 16) = 31.36: aa1(0, 17) = 33.75: aa1(0, 18) = 39.17: aa1(0, 19) = 39.17: aa1(0, 20) = 44.08: aa1(0, 21) = 49.77: aa1(0, 22) = 57.39 '特轻系列1的C0

aa1(1, 0) = 3.52: aa1(1, 1) = 3.93: aa1(1, 2) = 4.3: aa1(1, 3) = 4.62: aa1(1, 4) = 7.22: aa1(1, 5) = 8.08: aa1(1, 6) = 10.17: aa1(1, 7) = 12.46: aa1(1, 8) = 13.09: aa1(1, 9) = 16.2: aa1(1, 10) = 16.94: aa1(1, 11) = 20.47: aa1(1, 12) = 24.36: aa1(1, 13) = 24.66: aa1(1, 14) = 29.68: aa1(1, 15) = 30.89: aa1(1, 16) = 36.54: aa1(1, 17) = 39.02: aa1(1, 18) = 44.6: aa1(1, 19) = 44.44: aa1(1, 20) = 49.56: aa1(1, 21) = 55.29: aa1(1, 22) = 62.94 '特轻系列1的C

aa1(2, 0) = 2.23: aa1(2, 1) = 3.05: aa1(2, 2) = 3.49: aa1(2, 3) = 4.48: aa1(2, 4) = 6.2: aa1(2, 5) = 6.98: aa1(2, 6) = 10.04: aa1(2, 7) = 13.67: aa1(2, 8) = 15.94: aa1(2, 9) = 17.71: aa1(2, 10) = 19.84: aa1(2, 11) = 25.11: aa1(2, 12) = 27.98: aa1(2, 13) = 34.18: aa1(2, 14) = 37.59: aa1(2, 15) = 41.26:

aa1(2, 16) = 45.09: aa1(2, 17) = 53.28: aa1(2, 18) = 60.76: aa1(2, 19) = 70.85: aa1(2, 20) = 79.36: aa1(2, 21) = 89.59: aa1(2, 22) = 100.43 '轻窄系列2的C0

aa1(3, 0) = 3.93: aa1(3, 1) = 5.24: aa1(3, 2) = 5.87: aa1(3, 3) = 7.36: aa1(3, 4) = 9.88: aa1(3, 5) = 10.78: aa1(3, 6) = 14.96: aa1(3, 7) = 19.73: aa1(3, 8) = 22.71: aa1(3, 9) = 24.36: aa1(3, 10) = 26.98: aa1(3, 11) = 33.35: aa1(3, 12) = 36.73: aa1(3, 13) = 44.01: aa1(3, 14) = 46.76: aa1(3, 15) = 50.83: aa1(3, 16) = 55.03: aa1(3, 17) = 63.98: aa1(3, 18) = 73.83: aa1(3, 19) = 84.82: aa1(3, 20) = 93.94: aa1(3, 21) = 102.26: aa1(3, 22) = 110.78 '轻窄系列2的C

aa1(4, 0) = 3.47: aa1(4, 1) = 3.92: aa1(4, 2) = 5.43: aa1(4, 3) = 6.56: aa1(4, 4) = 7.81: aa1(4, 5) = 11.39: aa1(4, 6) = 14.17: aa1(4, 7) = 17.92: aa1(4, 8) = 22.38: aa1(4, 9) = 30#: aa1(4, 10) = 35.71: aa1(4, 11) = 41.91: aa1(4, 12) = 48.61: aa1(4, 13) = 56.68: aa1(4, 14) = 63.48: aa1(4, 15) = 71.67: aa1(4, 16) = 80.35: aa1(4, 17) = 89.52: aa1(4, 18) = 100.76: aa1(4, 19) = 113.75: aa1(4, 20) = 131.18: aa1(4, 21) = 142.84: aa1(4, 22) = 167.64 '中窄系列3的C0

aa1(5, 0) = 5.88: aa1(5, 1) = 6.56: aa1(5, 2) = 8.79: aa1(5, 3) = 10.44: aa1(5, 4) = 12.26: aa1(5, 5) = 17.21: aa1(5, 6) = 20.77: aa1(5, 7) = 25.66: aa1(5, 8) = 31.35: aa1(5, 9) = 40.67: aa1(5, 10) = 47.59: aa1(5, 11) = 55.06: aa1(5, 12) = 62.89: aa1(5, 13) = 72.21: aa1(5, 14) = 80.1: aa1(5, 15) = 87.26: aa1(5, 16) = 94.57: aa1(5, 17) = 102.06: aa1(5, 18) = 110.82: aa1(5, 19) = 120.52: aa1(5, 20) = 133.07: aa1(5, 21) = 141.31: aa1(5, 22) = 157.67 '中窄系列3的C

aa1(6, 0) = 0: aa1(6, 1) = 0: aa1(6, 2) = 0: aa1(6, 3) = 11.9: aa1(6, 4) = 16.79: aa1(6, 5) = 21.33: aa1(6, 6) = 26.78: aa1(6, 7) = 31.43: aa1(6, 8) = 36.67: aa1(6, 9) = 45.55: aa1(6, 10) = 55.55: aa1(6, 11) = 62.71: aa1(6, 12) = 70.3: aa1(6, 13) = 78.33: aa1(6, 14) = 99.53: aa1(6, 15) = 114.78: aa1(6, 16) = 124.98: aa1(6, 17) = 137.76: aa1(6, 18) = 158.18: aa1(6, 19) = 0: aa1(6, 20) = 0: aa1(6, 21) = 0: aa1(6, 22) = 0 '重窄系列4的C0

aa1(7, 0) = 0: aa1(7, 1) = 0: aa1(7, 2) = 0: aa1(7, 3) = 17.46: aa1(7, 4) = 23.81: aa1(7, 5) = 29.42: aa1(7, 6) = 36.41: aa1(7, 7) = 42.68: aa1(7, 8) = 48.99: aa1(7, 9) = 59.49: aa1(7, 10) = 70.96: aa1(7, 11) = 77.4: aa1(7, 12) = 83.88: aa1(7, 13) = 90.82: aa1(7, 14) = 107.23: aa1(7, 15) = 118.18: aa1(7, 16) = 125.48: aa1(7, 17) = 134.45: aa1(7, 18) = 147.97: aa1(7, 19) = 0: aa1(7, 20) = 0: aa1(7, 21) = 0: aa1(7, 22) = 0 '重窄系列4的C

aa1(8, 0) = 0.014: aa1(8, 1) = 0.028: aa1(8, 2) = 0.056: aa1(8, 3) = 0.085: aa1(8, 4) = 0.11: aa1(8, 5) = 0.17: aa1(8, 6) = 0.28: aa1(8, 7) = 0.42: aa1(8, 8) = 0.56: aa1(8, 9) = 0: aa1(8, 10) = 0: aa1(8, 11) = 0: aa1(8, 12) = 0: aa1(8, 13) = 0: aa1(8, 14) = 0: aa1(8, 15) = 0: aa1(8, 16) = 0: aa1(8, 17) = 0: aa1(8, 18) = 0: aa1(8, 19) = 0: aa1(8, 20) = 0: aa1(8, 21) = 0: aa1(8, 22) = 0 '相对轴向载荷A/C0

aa1(9, 0) = 0.19: aa1(9, 1) = 0.22: aa1(9, 2) = 0.26: aa1(9, 3) = 0.28: aa1(9, 4) = 0.3: aa1(9, 5) = 0.34: aa1(9, 6) = 0.38: aa1(9, 7) = 0.42: aa1(9, 8) = 0.44: aa1(9, 9) = 0: aa1(9, 10) = 0: aa1(9, 11) = 0: aa1(9, 12) = 0: aa1(9, 13) = 0: aa1(9, 14) = 0: aa1(9, 15) = 0: aa1(9, 16) = 0: aa1(9, 17) = 0: aa1(9, 18) = 0: aa1(9, 19) = 0: aa1(9, 20) = 0: aa1(9, 21) = 0: aa1(9, 22) = 0 ' 界限系数e

aa1(10, 0) = 2.3: aa1(10, 1) = 1.99: aa1(10, 2) = 1.71: aa1(10, 3) = 1.55: aa1(10, 4) = 1.45: aa1(10, 5) = 1.31: aa1(10, 6) = 1.15: aa1(10, 7) = 1.04: aa1(10, 8) = 1: aa1(10, 9) = 0: aa1(10, 10) = 0: aa1(10, 11) = 0: aa1(10, 12) = 0: aa1(10, 13) = 0: aa1(10, 14) = 0: aa1(10, 15) = 0: aa1(10, 16) = 0: aa1(10, 17) = 0: aa1(10, 18) = 0: aa1(10, 19) = 0: aa1(10, 20) = 0: aa1(10, 21) = 0: aa1(10, 22) = 0 '轴向载荷系数y

'圆柱滚子轴承（GB283-87) d=30~100