時計をずっと表示するには  WHILE TRUE CLS PRINT TIME$ WAIT 60 WEND です。