1 // ----------------------------------------------------------------------------
3 // ----------------------------------------------------------------------------
5 #include "modGeneralTricks.h"
7 // static char *VB_Name = "modGeneralTricks";
21 double ValEx(char *TS)
25 // Extends the Val() function for
26 // german-style number-representing strings
30 i = InStr(1, TS, ",");
34 RS = Right(TS, Len(TS) - i);
35 ValEx = ValCAT(LS, ".", RS);