| Einführung in VBA | ||
|---|---|---|
| Zurück | ||
Vergleichen Sie bitte hier die Lösung der Aufgaben aus Kapitel 3. Auch andere Lösungen können richtig sein, wenn die richtigen Ergebnisse berechnet werden.
Beispiel A-1. VBA-Funktionen für ein Doppel-T-Profil (Lösung)
Function dt_profil_flaeche(H, B, t, s As Double) As Double
h1 = H - 2 * t
dt_profil_flaeche = h1 * s + 2 * B * t
End Function
Function dt_profil_umfang(H, B, t, s As Double) As Double
dt_profil_umfang = 2 * B + 2 * (B - s) + 2 * (H - 2 * t) + 4 * t
End Function