問題タブ [qbasic]

古い Quick BASIC プログラムを VB.Net に変換しようとしています。古い file ステートメントを直接置き換えるものはないようです。データベースの構築は、私の単純なニーズに対してやり過ぎのように思えます。

VB.Netで次のことを行うにはどうすればよいですか?

現在、プログラムを QBasic から VB.Net に変換しています。次のコード行があります。

と訳しました

VB.Netの場合ですが、結果は異なります。ここにいくつかの情報があります:

円周率 = 3.141592654

そして、私のテストでは、値に
「6.8929106501697825」 を使用し、X(Z, 2)値に「 -5.08864764726704 」を使用しました
X(Z, 1)

QBasic の結果: 323.9964 VB.Net
の結果: 323.5636369944437

私は何か間違ったことをしましたか？

ありがとう

BASICでプログラムすることを学ぶことについての古い本を持っています。それは非常によく書かれていて、面白くて、コンピュータプログラミングの最初のステップを教えるのに素晴らしい仕事をします。それはまた、プログラミングについての私の最初の本であり、それは私にとってすべてを始めました。:)

今、プログラミングを学びたいと思っている別の人がいます、そして（私は彼に自分で教えるためにそこにいることができないので）私は彼を推薦するより良い本を考えることができません。確かに、言​​語は時代遅れですが、プログラミングの基本は変わっていません。また、この本は非常によく書かれているので、同等のものはまだ見ていません（確かに私が見たわけではありません）。

キャッチは1つだけです。この本は古いので、25年ほど前にメインフレームで人気があった（または私が集めた）BASICの方言について書かれています。これは、行番号が必須であり、適切なテキストエディタがない（すべての編集は行番号を介してコマンドラインで行われます）などです。これは、私が最初に本を持ったとき、すでにかなり時代遅れでした。

私（および他の人）にとって幸いなことに、構文はMicrosoftQBasicとほぼ完全に互換性があることがわかりました。私が覚えている唯一の違いは、本では、¤QBasicが必要な間、文字列変数に接尾辞を付ける必要があったことです$。どういうわけか、それらは両方ともその古いキーボードの同じキーで終わっていたので、私はこれを自分で発見しました。

さて、QBasicまたはQuickBasicの入手をお勧めすることもできますが、もっと優れた、より現代的なものはないのではないかと思います。テキストモード画面、制限された低速グラフィックス、および64Kの使用可能なRAMは、一種の教育的ですが...

助言がありますか？

私の QB アプリケーションには、次のような再生コマンドがあります。

これらを何らかの方法で最新のアプリケーションで使用できるものに変換したいと思います。何かご意見は？現在、FreeBasic でアプリケーションをいじっています。

画面の場所（例：10列目と20行目）に何かを書く必要がある場合があります。ネットで検索したところ、windows.hを使用しているwindowsハンドラーを使用して実行されていることがわかりました。

はい、ハンドルの使用は高速ですが、やや複雑なので、printf（string）のみを使用し、画面に収まるように文字列を変更し、すべてのprintfコマンドが80x24コンソール画面全体に表示されるクラスを作成しました。このクラスは、QBasicのCLS、LOCATE x、y、およびPRINTコマンドを模倣します。

質問：ウィンドウハンドルや私のような遅いクラスを使用せずに、画面内の任意の場所に到達して文字またはドット（描画）を配置する簡単な方法はありますか？

私のQBASICクラスは非常に遅いので、1秒間に数回しか使用できません。VC ++ 10.0 Windows XP

御時間ありがとうございます。

これが私のクラスといくつかの例です：

解決策はないと思います。

QBASICには、カーソルを画面上の特定の位置に配置するLOCATE (x, y)や、画面をクリアするCLSなどのコマンドがいくつかあり、コンソール アプリケーションをきれいに見せるのに役立ちます。

ルビーは同じ機能を持っていますか? 小さなプロジェクトに使用するのはいいかもしれません。

助けてくれてありがとう

editqbasic のようなプログラムを作成したいので、(-command のように) コンソールからスクロールバーを削除したいと思います。ここにスレッドがあることは知っていますが、 Windows 7 32bitでは機能しません。コンソール画面のバッファをコンソールウィンドウと同じサイズにすればよいと書かれています。
これは機能しません：

csbi.dwSize.Xandを 10 以下に設定してもY、スクロールバーは表示されます。

labelを使用するコードがいくつかあります。その例を以下に示します。

ご覧のとおり、ラベルホールドアップを使用してFor..Nextループからジャンプします。これをより適切で適切なコードに変更する良い方法がわかりませんか？たとえば、私は通常次のようなことをするかもしれません：

しかし、これは問題を引き起こします-FOR..NEXTループは、その半分のIF..THEN内にネストされています。この問題を解決する方法について何か提案はありますか？

私はPythonを初めて使用し、QBasicの経験がありません。理論的に間違った値を思いついたPythonでシミュレーションを実行していました。次に、それをQBasicで実行し、理論的に予測された値を考え出しました。

これがテストケースです。確率P（0.9 <％Y <= 1.8）のみをカウントしているので、カウントはこれらの値の範囲内に収まる必要があります。1-random.random（）はその場合のみでしたが、すべての場合にそれを使用しようとすると、間違った値が表示されました。これが理論上の結果であり、それがどのように異なるかを見ることができます。

y〜u（0,1）= 0.575

y〜exp（2）= 0.3371

x1〜u（0,1）x2〜u（0,2）= 0.4475

P（y = 0.25）= 0.8 P（y = 1.5）= 0.2 = 0.32

Pythonでは、シミュレーションコードは次のとおりです。

これがPythonの出力とそれに続くはずの値ですが、これは結果がどれだけ離れているかを示しています。

QBasicのシミュレーションコードは次のとおりです。

ケース1：

ケース2：

ケース3：

ケース4：

これがQBasicの出力で、これが実際に正しい結果をどのように得ているかを示しています。

上記のコードはすべて、エラーなしで機能します。値を取得するために使用されるアルゴリズムに違いは見られません。PythonがQBasicとは異なる数値を生成するかどうか、そしてそれがこの動作の背後にある理由を説明するかどうかはわかりません。

私はこれらの言語の両方に不慣れですが、QBasicは非常に原始的であり、Pythonが正しい答えを取得し、QBasicが間違った答えを取得する可能性が高いようです。しかし、逆のことが起こっています。コードの違いに関係しているようには見えません。翻訳では、彼らは両方とも同じことを言っているようです。

彼らが2つの異なる結果をもたらす理由に興味があります。Pythonが間違った答えを出し、QBasicが正しい答えを出している理由にもっと興味があります。

GW-BASICおよびQBasicのDRAWステートメントと同等またはそれらの実装であるVisualBasic（または.NETまたはC ++）はありますか？

図面をDRAWステートメントの形式で文字列として出力する非常に古いプログラムがあり、VisualBasicで開発しているWindowsアプリケーションでそれらをレンダリングしたいと考えています。