XProfan

English

Jörg
Sellmeyer

var a% = Ord("z")

Select a%

    CaseOf > 47, < 58

    Print "Zahl"

    CaseOf > 64 , < 123

    Print "Buchstabe"

EndSelect

nput

unfortunately evaluates Select/CaseOf here The terms self-contained from. one can't detect, whether a worth sowohl larger as 64 as well as small as 123 is.
is the solid and if so, how can one then such a thing How "liegt between x and y" inquire.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

01/24/12 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

RGH

In Select/Endselect goes such a thing not without further, there several through comma separated Vergleichswerte quasi with OR verknüpft go:
Compile Mark Separation

var a% = Ord("z")

Select a%

    CaseOf < 48, > 57

    Print "keine Zahl"

    CaseOf < 65 , > 122

    Print "kein Buchstabe"

EndSelect

nput

otherwise for IF/ELSEIF/ENDIF look you times the function BETWEEN() on.

Greeting
Roland

XProfan X2
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

01/24/12 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Jörg
Sellmeyer

Yes, already clear, How I the bypass can but I had it useful found, that so regulate to.
would be still 'ne nice Possibility, if one Perhaps:
Compile Mark Separation