Курсовая работа: Расчет составной конструкции системы двух тел

msfgSharnir.TextMatrix(1, 1) = Str(Round(Rd, 2))

msfgSharnir.TextMatrix(2, 1) = Str(Round(Rb, 2))

msfgSharnir.TextMatrix(3, 1) = Str(Round(Xa, 2))

msfgSharnir.TextMatrix(4, 1) = Str(Round(Ya, 2))

RaschetZadelka

msfgZadelka.TextMatrix(1, 1) = Str(Round(Rd, 2))

msfgZadelka.TextMatrix(2, 1) = Str(Round(Rb, 2))

msfgZadelka.TextMatrix(3, 1) = Str(Round(Xa, 2))

End Sub

Private Sub Form_Load()

End Sub

Private Sub vixod_Click()

Unload Me

End Sub