Numerisches-/Zahlenfeld auslesen – brauche Hilfe
Verfasst: Do, 08.04.2004 17:20
Hi,
ich habe folgendes Problem. In einem Dialog habe ich ein numerisches Feld eingefügt, weil die User dort nur Zahlenwerte eingeben dürfen. Nun wollte ich den Wert aus dem Feld abrufen, aber die zurückgegebene Variable ist leer. Wohingegen der Wert aus einem Textfeld ohne Probleme ausgelesen wird. Wo ist mein Fehler?
Hier der Code
ich habe folgendes Problem. In einem Dialog habe ich ein numerisches Feld eingefügt, weil die User dort nur Zahlenwerte eingeben dürfen. Nun wollte ich den Wert aus dem Feld abrufen, aber die zurückgegebene Variable ist leer. Wohingegen der Wert aus einem Textfeld ohne Probleme ausgelesen wird. Wo ist mein Fehler?
Hier der Code
Code: Alles auswählen
Sub Dialog2Show
Dim Dlg As Object 'Dialogfeld
Dim Zah As Object 'numerisches Feld
Dim Tex As Object 'Textfeld
DialogLibraries.LoadLibrary("Standard")
Dlg = CreateUnoDialog(DialogLibraries.Standard.Dialog1)
Dlg.Execute()
Zah = Dlg.getControl("NumericField1")
MsgBox "'" & Zah.Text & "'" 'hier soll der Inhalt des numerischen Feldes
'angezeigt werden. Aber die Variable ist leer.
Tex = Dlg.getControl("TextField1")
MsgBox "'" & Tex.Text & "'" 'hier wird der Inhalt des Text
'Feldes angezeigt werden
Dlg.dispose()
End Sub