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:

08.04.2018
IDBE RibbonCreator 2016 (x86 und x64) für Office 2013 und Office 2016 - neue Version. ...


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. ...

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

 

Letzte Änderung:
13.07.2018, 11:36