WCM Forum

WCM Forum (http://www.wcm.at/forum/index.php)
-   Programmierung (http://www.wcm.at/forum/forumdisplay.php?f=17)
-   -   Abfrage ob String oder Double/Long VB 6.0 (http://www.wcm.at/forum/showthread.php?t=95875)

coolbininet 03.05.2003 20:57

Abfrage ob String oder Double/Long VB 6.0
 
Hallo!

Habe in VB 6.0 folgendes Problem. Möchte aus einem Textfeld (Form1.text4) wissen ob ein Wert eingetragen ist. Wenn ich eine Zahl habe (Long/Double) dann soll erster Fall eintreten, wenn ich Text (Zeichenkette/String) habe möchte ich, dass zweiter Fall eintritt.

Das das was mit if Bedingung then Anweisung else Alternative zu tun haben kann ist mir bekannt. Bei allem anderen kenne ich mich leider nicht aus.

mfg

Coolbininet

servman 03.05.2003 22:10

vielleicht hilft dir die funktion VAL(<String>) weiter .

Jaguar 04.05.2003 01:08

Probier mal die Funktion isNumeric()..

wbendl 04.05.2003 07:33

hi!

der inhalt eines textfeldes ist grundsätzlich ein string.
mit der funktion isnumeric kannst du prüfen ob es eine zahl ist.
mit clong kann der variablentyp eines numerischen strings in long
umgewandelt werden.

eine universale lösung ist die verwendung des datentyps variant.
mit vartype kann man den datentyp dann abfragen

sub testevariable

dim x as variant
dim xtyp as integer

x = text4
xtyp = vartype(x)

select case xtyp
case vblong
'dann mach folgendes

case vbstring
'dann mach folgendes

end select

end sub

mit if - then ist es auch möglich, aber ich halte das für einfacher, und mann kann es leicht auf weitere variablentypen erweiteren.

mehr information in der vb-hilfe zur vartype-funktion

mfg

wb

BULMIST 04.05.2003 12:16

Also If isNumeric(text4) müsst auf jeden Fall gehen.

If isNumeric(form1.text4) then
//Code
Else
//Code
EndIf

Ciao, Bulmist

coolbininet 04.05.2003 13:31

Danke für die Antwort an alle Helfer!
 
Danke, bin mit eurer Hilfe zu einer brauchbaren Lösung gekommen.

Da kann man wieder sehen wie kollegial die WCM-Community zusammen hält! :)

Danke, Danke, Danke, ...

mfg

Coolbininet


Alle Zeitangaben in WEZ +2. Es ist jetzt 07:34 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
© 2009 FSL Verlag