Sie sind hier:   Teil 3

Teil 3

Der eigene Format Assistent
(3/5)

Erstellen Sie die folgende Funktion in Ihrem Formular
(diese generiert die Format Eigenschaft):

Public Sub fnc_GeneriereFormat()

   Dim strPositiv
As String
   Dim strNegativ
As String
  
   strPositiv = Me!cboPositiv.Column(1)
   strNegativ = Me!cboNegativ.Column(1)
  
   Me!txtPositiv.Format = "#,##0.00[" & _
                           Me!cboPositiv.Column(1) & _
                           "];-#,##0.00[" & _
                           Me!cboNegativ.Column(1) & "]"
   Me!txtNegativ.Format = "#,##0.00[" & _
                           Me!cboPositiv.Column(1) & _
                           "];-#,##0.00[" & _
                           Me!cboNegativ.Column(1) & "]"
  
   p_Rueckgabe = "#.##0,00[" & _
                 Me!cboPositiv.Column(0) & _
                 "];-#.##0,00[" & _
                 Me!cboNegativ.Column(0) & "]"
  
End Sub


Speichern Sie das Formular unter dem Namen "frm_Assistent" ab.


 Zurück

 

 Weiter



Letzte Änderungen:

22.09.2015
Version 1.1001 des IDBE RibbonCreators 2016 veröffentlicht. ...


19.01.2013
Seiten für das Datenbankfenster aktualisiert. ...

15.01.2013
Referenzen hinzugefügt. ...

04.01.2012
Komplette Webseite aktualisiert. ...

29.08.2011
Version 1.1014a des IDBE RibbonCreators 2010 veröffentlicht. ...

 

Letzte Änderung:
18.01.2018, 15:19