DIM a$
DIM b

a$ = "Hello"
b  = 1

SELECT CASE UCASE$(a$)

 CASE "GoodBye"
  ?  "GoodBye"

 CASE "12345"
  ?  "12345"

 CASE "HELLO"
  ?  "It passed the Case string test!"

 CASE "bombed"
  ?  "bombed"

END SELECT

SELECT CASE b + 1

 CASE 4
  ?  "GoodBye"

 CASE 3
  ?  "12345"

 CASE 2
  ?  "It passed the Case numeric test!"

 CASE 1
  ?  "bombed"

END SELECT

Result:

It passed the Case string test!
It passed the Case numeric test!