Механизм поперечно-строгального станка

df5 = m * z5 - 2 * m * (h1 + c - x5)

df6 = m * z6 - 2 * m * (h1 + c - x6)

Worksheets(3).Range("c22") = df5

Worksheets(3).Range("d22") = df6

Worksheets(3).Range("b23") = "делительная толщина зубьев S"

s5 = 0.5 * 3.14 * m + 2 * m * x5 * Tan(q)

s6 = 0.5 * 3.14 * m + 2 * m * x6 * Tan(q)

Worksheets(3).Range("c23") = s5 >Worksheets(3).Range("d23") = s6

Worksheets(3).Range("b24") = "основная толщина зубьев Sb"

sb5 = db5 * (3.14 / (2 * z5) + 2 * x5 * Tan(q) / z5 + inv)

sb6 = db6 * (3.14 / (2 * z6) + 2 * x6 * Tan(q) / z6 + inv)

Worksheets(3).Range("c24") = sb5

Worksheets(3).Range("d24") = sb6

Worksheets(3).Range("b25") = "начальная толщина зубьев Sw"

sw5 = s5

sw6 = s6

Worksheets(3).Range("c25") = sw5

Worksheets(3).Range("d25") = sw6

Worksheets(3).Range("b26") = "делительный шаг P"

p = 3.14 * m

Worksheets(3).Range("c26") = p

Worksheets(3).Range("b27") = "основной шаг pb"

pb = 3.14 * m * Cos(q)

Worksheets(3).Range("c27") = pb

Worksheets(3).Range("b28") = "радиус кривизны галтели r"

r = 0.4 * m

Worksheets(3).Range("c28") = r

Worksheets(3).Range("b29") = "коэффициент торцевого перекрытия e"

t5 = (((da5 / db5) ^ 2) - 1) ^ 0.5

t6 = (((da6 / db6) ^ 2) - 1) ^ 0.5

e = (z5 * t5 + z6 * t6 - (z5 + z6) * Tan(q)) / (2 * 3.14)

Worksheets(3).Range("c29") = e

End Sub

Список литературы

1Алехнович В.М.”Теория механизмов и манипуляторов”. Издательство высшая школа.1985г.

2.Машков А.А.”Теория механизмов и манипуляторов”. Издательство высшая школа.1971г.

Приложение

 Скачать реферат