Gruppe
Dialog
Problem
Der Wert einer TextBox soll über eine Formel weiterberechnet und an die TextBox zurückgegeben werden.
ClassModule: frmCalc
Private Sub cmdCancel_Click()
Unload Me
End Sub
Private Sub cmdOK_Click()
txtBerechnen.Text = Sin(CDbl(txtBerechnen.Text))
End Sub
Private Sub UserForm_Initialize()
txtBerechnen = 122.3
End Sub
StandardModule: Modul1
Sub DialogAufruf()
frmCalc.Show
End Sub