DO WHILE .T.WAIT "M=" TO M IF UPPER(M) $ "YN" EXIT ENDIF ENDDO

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/27 23:27:16
DOWHILE.T.WAIT"M="TOMIFUPPER(M)$"YN"EXITENDIFENDDODOWHILE.T.WAIT"M="TOMIFUPPER(M)$"YN"EXITENDIFENDDO

DO WHILE .T.WAIT "M=" TO M IF UPPER(M) $ "YN" EXIT ENDIF ENDDO
DO WHILE .T.WAIT "M=" TO M IF UPPER(M) $ "YN" EXIT ENDIF ENDDO

DO WHILE .T.WAIT "M=" TO M IF UPPER(M) $ "YN" EXIT ENDIF ENDDO
让用户输入一个按键,如果是Y或者N就继续执行,否则重新输入