Лабораторная работа № 1 СОЗДАНИЕ ПОЛЬЗОВАТЕЛЬСКОГО ПРИЛОЖЕНИЯ
«ПРОЕКТИРОВОЧНЫЙ РАСЧЕТ КЛИНОРЕМЕННОЙ ПЕРЕДАЧИ» С ПОМОЩЬЮ РЕДАКТОРА VISUAL BASIC
Цель работы. Изучение основных расчетных зависимостей и получение навыков определения параметров клиноременной передачи на ПК в среде программирования VBA.
Задание. Создать приложение «Проектировочный расчет клиноременной передачи» с помощью редактора Visual Basic.
Исходные данные. |
|
|
И |
|
||
P1 – мощность передачи, |
кВт ; |
|
|
|||
n1 |
– частота вращения ведущего шкива, об / мин |
; |
||||
d1 – диаметр малого шкива, мм ; |
Д |
|
||||
q |
– вспомогательный коэффициент ; |
|
|
|||
|
|
|
А |
|
|
|
pl |
– масса единицы ремня (погонная плотность), кг / м ; |
|||||
А – площадь поперечного сечения ремня, мм2 ; |
|
|||||
v – скорость перемещения ремня, м / с ; |
|
|||||
α1 – номинальный угол о хвата малого шкива. |
|
|||||
|
|
С |
|
|
|
|
Результаты расчетаб. |
|
|
|
|||
Результатом работы пр ложения является расчет основных |
||||||
параметров |
дляиавтоматизированного |
проектирования |
||||
клиноременной передачи: момент вращения ведущего шкива; полезное окружное усилие, передаваемое ременной передачей; натяжение ведущей ветви ремня; натяжение ведомой ветви ремня; напряжение ремня, возникающее при действии центробежной нагрузки и др.
Расчетные зависимости.
1. Момент вращения ведущего шкива.
T1 = 9550 P1 , n1
где T1 – момент вращения ведущего шкива, кН м;
16
P1 – мощность передачи, кВт ;
n1 – частота вращения ведущего шкива, об/мин.
2. Полезное окружное усилие, передаваемое ременной
передачей. |
|
|
|
|
|
3 T1 |
|
|||
|
|
|
F = 2 10 |
, |
||||||
|
|
|
t |
|
|
|
d1 |
|||
|
|
|
|
|
|
|
|
|
|
|
где Ft – полезное окружное усилие, |
|
передаваемое ременной |
||||||||
передачей, Н; |
|
|
|
|
|
|
|
|
|
|
T1 |
– момент вращения ведущего шкива, кН м; |
|||||||||
d1 |
– диаметр малого шкива, мм . |
|
|
|
|
|
И |
|||
3. Натяжение ведущей ветви ремня. |
|
|||||||||
|
|
|||||||||
|
|
|
|
|
Д |
|||||
|
|
|
S1 |
= Ft |
|
q |
, |
|
||
где S1 |
|
|
|
|
|
q −1 |
|
|
||
– натяжение ведущей ветви ремня, Н; |
||||||||||
q |
|
|
А |
|
|
|||||
– вспомогательный коэффициент; |
|
|
||||||||
Ft |
– полезное окружное усилие, передаваемое ременной |
|||||||||
передачей, Н. |
|
б |
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
||
4. Натяжение ведомой ветви ремня. |
|
|
||||||||
|
|
С |
|
|
|
|
1 |
|
|
|
|
|
S2 |
= Ft q −1 |
, |
|
|||||
где S2 – натяжение ведомойиветви ремня, Н; |
||||||||||
Ft – полезное окружное усилие, передаваемое ременной |
||||||||||
передачей, Н; |
|
|
|
|
|
|
|
|
|
|
q |
– вспомогательный коэффициент. |
|
|
|||||||
5. Напряжение ремня, возникающее при действии центробежной нагрузки.
σс = pAl v2 ,
где σс– напряжение ремня, возникающее при действии центробежной
нагрузки;
pl – масса единицы ремня (погонная плотность), кг/м ;
17
v – скорость перемещения ремня, м/с ;
А– площадь поперечного сечения ремня, мм2 .
6.Дополнительное напряжение от центробежной нагрузки.
Sc =σc A,
где Sc – дополнительное напряжение от центробежной нагрузки;
σс– напряжение ремня, возникающее при действии центробежной нагрузки;
А– площадь поперечного сечения ремня, мм2 .
7.Сила предварительного натяжения.
|
So = |
S1 + S2 |
|
, |
|
|
|
|
|
2 |
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
где So – сила предварительного натяжения, Н; |
|
|
||||||
S1 – натяжение ведущей ветви ремня, Н; |
|
|
||||||
S2 – натяжение ведомой ветви ремня, Н. |
|
|
||||||
|
|
|
|
|
|
И |
||
8. Сила, действующая на вал со стороны шкива. |
||||||||
S = S2 |
+ S2 |
−Д2S S cosα |
1 |
, |
||||
1 |
|
2 |
1 |
2 |
|
|
||
где S – сила, действующая на вал со стороны шкива, Н; |
||||||||
S1 – натяжение ведущей ветвиАремня, Н; |
|
|
||||||
б |
|
|
|
|
|
|
|
|
и |
|
|
|
|
|
|
|
|
S2 – натяжение ведомой ветви ремня, Н; |
|
|
||||||
α1– номинальный угол обхвата малого шкива. |
|
|||||||
Порядок выполненияС работы.
1. Все данные, которые используются в приложении (рис. 3, 4), необходимо разместить на элементе управления MultiPage.
2. Для вывода результатов расчетов использовать элемент управления ListBox.
Часть программного кода для вывода результатов:
ListBox1.Clear ListBox1.ColumnCount = 2
18
ListBox1.AddItem "СИЛОВЫЕ ХАРАКТЕРИСТИКИ" ListBox1.List(0, 1) = "ЗНАЧЕНИЯ"
ListBox1.AddItem "Момент вращения ведущего шкива"
ListBox1.List(1, 1) = T1
ListBox1.AddItem "Полезное окружное усилие"
ListBox1.List(2, 1) = Ft
ListBox1.AddItem "Натяжение ведущей ветви ремня"
ListBox1.List(3, 1) = S1 |
|
|
ListBox1.AddItem "Натяжение ведомой ветви ремня" |
||
ListBox1.List(4, 1) = S2 |
|
И |
|
Д |
|
ListBox1.AddItem "Напряжение ремня, возникающее при действии |
||
центробежной нагрузки" |
А |
|
ListBox1.List(5, 1) = sig |
|
|
|
|
|
ListBox1.AddItem "Дополнительное напряжение от центробежной
нагрузки" |
|
|
ListBox1.List(6, 1) |
= Sc |
|
ListBox1.AddItem "С ла предварительногоб |
натяжения" |
|
ListBox1.List(7, 1) |
= So |
|
|
и |
|
ListBox1.AddItemС" ила, действующая со стороны шкива "
ListBox1.List(8, 1) = S
19
|
|
|
|
И |
|
|
|
Д |
|
|
|
А |
|
|
|
б |
|
|
|
и |
|
|
|
|
С |
|
|
|
|
Рис. 3. Приложение «Проектировочный расчет клиноременной передачи» (Начальная страница элемента управления MultiPage)
20