Курсовая работа: Решение задач нелинейного программирования

Private Sub Command3_Click()

‘показать справку

Unload Form2

Load Form3

Form3. Show

End Sub

Private Sub Command4_Click()

Unload Form2

End Sub

Private Sub Form_Load()

Left = (Screen. Width – Width) \ 2

Top = (Screen. Height – Height) \ 2

‘подготовка текстовых окон к вводу данных при запуске рабочего окна

Text1. Text = «»

Text2. Text = «»

Text3. Text = «»

Text4. Text = «»

Text5. Text = «»

Text6. Text = «»

Text7. Text = «»

Text8. Text = «»

Text9. Text = «»

Text10. Text = «»

Text11. Text = «»

Text12. Text = «»

Text13. Text = «»

Text14. Text = «»

Text15. Text = «»

Text16. Text = «»