qb64

1熱

3答えて

私はしかし、私が使用したくない、すべてのドライブのデフォルトディレクトリを取得するには、次のコードを使用しているQB64

内のドライブのデフォルトディレクトリを取得する方法_CWD $ 行うためのより効率的な方法がありますこの？エラートラップなしQB64内のすべてのドライブのデフォルトディレクトリを取得する REM get default directory of drives. ON ERROR GOTO ErrSub FOR D = 1 TO 26 D$ = CHR$(D + 64) + ":"

0熱

1答えて

QB64のWideCharToMultiByte

ANSIからUnicodeに変換して戻す際に問題があります。次のコードは、私がやっていることを説明しています。私は0x57エラーが発生します。..いくつかのより多くの引数がByValキーワードを渡す必要が DECLARE DYNAMIC LIBRARY "kernel32" FUNCTION MultiByteToWideChar& (codePage~&, dwFlags~&, lps

2熱

2答えて

32ビットの16進数を4バイトに分割する[QB64]

32ビットの16進数（例：CEED6644）を4バイトに分解するにはどうすればよいですか（var1 = CE、var2 = ED、 var3 = 66、var4 = 44）。 QB64またはQBasicで。私はこれを使用して、複数のデータバイトを1つの配列アドレスに格納します。あなたはこれを実現するために、整数の除算（\）とビット単位のAND（AND）を使用することができ DIM Array(&H

0熱

1答えて

QB64のコマンドラインに三重引用符が必要です

QB64のコマンドラインを解析するプログラムがあります。 COMMAND $関数は、コマンドラインを返します。私は、スペースを含むファイル名とは異なるように、引用符内からパースしてスペースを含む可能性のある長いファイル名を解析する必要があります。たとえば、 "long filename.ext" コマンドラインに引用符がない場合、コマンド$は、引用符で囲んだ場合はファイル名を "filenam

1熱

1答えて

QB64でファイルを暗号化する方法

QB64でこのプログラムを使用してファイルを暗号化しようとしています。実際にはファイルを暗号化せず、常に正常に戻ります。どうして？ DECLARE LIBRARY FUNCTION EncryptFile (f$) FUNCTION DecryptFile (f$, BYVAL f&) END DECLARE PRINT "Enter filename"; INPUT

2熱

2答えて

不正な配列型がサブルーチンに渡されました

QB64に慣れていないので、ドキュメントが疎であるため問題があります。サブではないこと、 CALL sortArray(chars(), LENGTH) 私は上記のREDIMを使用するのでと仮定しています：次の行に「サブに渡された不正な配列型」 - TYPE character FName AS STRING * 12 LName AS STRING * 12 ID_Num AS INT