Textboxdaten an Textbox übergeben
08.02.2007 19:23:19
Mathias
ich hab ein Problem und hoffe ihr könnt mir helfen:
Ich möchte Daten aus einer Textbox einer UF in einer Textbox in einer andere überspielen.
Hier meine Codes:
Private Sub cmdBRH_Click()
'HIERMIT WIRD ANGEWIESEN; WORAUS frmFlaeche gestartet wurde
BerechnungFlaeche = "0"
frmFlaeche.Show
End Sub
die Variable BerechnungFlaeche habe ich als String deklariert
Private Sub cmdOK_Click()
'HIERMIT WIRD FESTGELEGT WOHIN DAS ERGEBNIS GESCHRIEBEN WIRD
If BerechnungFlaeche = "0" Then frmGas.txtFlaeche.Value = Me.txtAngemesseneHeizflaecheBG.Value
If BerechnungFlaeche = "1" Then frmGas.txtFlaeche1.Value = txtAngemesseneHeizflaecheBG.Value
If BerechnungFlaeche = "2" Then frmGas2.txtFlaeche.Value = txtAngemesseneHeizflaecheBG.Value
Me.Hide
End Sub
Kann mit wer helfen
Anzeige