qbasic

    1зной

    1ответ

    Я пытаюсь зашифровать файл с помощью этой программы в QB64. Он фактически не шифрует файл и всегда возвращает его успешно. Зачем? DECLARE LIBRARY FUNCTION EncryptFile (f$) FUNCTION DecryptFi

    1зной

    3ответ

    Я использую следующий код, чтобы получить каталоги по умолчанию для всех дисков, однако я не хочу использовать _CWD $ есть более эффективный способ сделать это? REM get default directory of drives. O

    4зной

    1ответ

    У меня есть старый .bas-файл, который я пытаюсь просмотреть и запустить в некоторые проблемы. Поиск в Интернете, кажется, указывает, что я должен быть в состоянии только открыть его в блокноте или sim

    0зной

    2ответ

    Я пытаюсь создать программу в Qbasic, в которой человек может ввести свое имя и называть себя администратором или нежелательным пользователем. Как сохранить эти настройки в моей программе?

    0зной

    1ответ

    Я изучаю QBasic и нашел заданный пользователем код example в документации. В этом примере есть строковый элемент внутри пользовательского типа, и эта строка не имеет определенной длины. Однако мой ком

    1зной

    1ответ

    Я хотел бы знать, как правильно подключать STDOUT и STDIN к qbasic программе, работающей на DOS 6.22. Я хотел бы, чтобы моя программа qbasic могла запускать EEUPDATE.exe через следующую строку: «EEUPD

    1зной

    1ответ

    Я попытался сделать простую программу входа с помощью qbasic. Я использовал 3 модуля и 1 основной модуль. Вот код: DECLARE SUB login() DECLARE SUB menu() DECLARE SUB REGISTER() CLS CALL menu END

    1зной

    2ответ

    Я только начинаю с обработки файлов в qbasic. В программе, которую я написал, всегда отображается ошибка «режим плохого файла». Пожалуйста, помогите мне! OPEN "test.dat" FOR INPUT AS #1 CLS INPUT "E

    -1зной

    1ответ

    Я узнал, что есть функция BOF, доступная для использования в QBASIC. Он называется «Начало файла». Но я не нашел примеров его использования. Пожалуйста помоги.

    1зной

    1ответ

    Я использую следующий код в Qb64 улавливать Control-Break: ON TIMER(1) GOSUB breaktrap TIMER ON x = _EXIT ' disable break DO _LIMIT 50 x$ = INKEY$ LOOP breaktrap: v = _EXIT IF v THEN