ab.com コミュニティ :: ｉｆ文の連発をすると？？？

ab.com コミュニティ https://www.activebasic.com/forum/

ｉｆ文の連発をすると？？？ https://www.activebasic.com/forum/viewtopic.php?t=16	ページ 1 ／ 1

作成者:	あらら [ 2005年5月30日(月) 21:21 ]
記事の件名:	ｉｆ文の連発をすると？？？
初めまして。算数ソフトの作成で、計算問題のレベルをいろいろ設定するために、if文をたくさん使うとデバッグ中はうまく走るのですが、、コンパイルすると途中で止まります。どうか助けてください。

作成者:	山本 [ 2005年5月30日(月) 21:22 ]
記事の件名:
差支えがなければ、問題のソースコードを送っていただけると助かります。

作成者:	あらら [ 2005年5月30日(月) 21:22 ]
記事の件名:
送って、ぜひ見てもらって欲しいのですが、どうやって送ればよいのですか？この欄に「貼り付け」しても良いのですか？全部となると、長くなりますが・・・・。初心者です。とほほ・・・。　ちなみに、算数の教材を作っており、昔のDOS-BASICで走らせていたプログラムからの移植をしているのです。　ActiveBASIC3.0以降では、Read文、Data文、Restore文が使えないようなので、ActiveBASIC2.59を引っ張り出して、プログラミング中です。　だからActiveBASIC4.0以降の環境で、Read文、Data文、Restore文をどのように移植したら良いか教えてくださっても結構です。それでも同じ症状が出たら、「if文の連発を・・・」（ActiveBASIC2.59固有の症状かもしれないので）を解決しないといけないのかなとも思っています。　ということで２つについて教えてください。よろしくお願いします。

作成者:	ささら [ 2005年5月30日(月) 21:22 ]
記事の件名:
あららさん始めまして、ささらという者ですn(_ _)n お困りのようでしたので、微力ながらお助けさせていただきます。　　最初のご質問ですが、山本さんの、 > > 差支えがなければ、問題のソースコードを送っていただけると助かります。という書き込みはつまり、「dais@muc.biglobe.ne.jp宛てのメールにソースコードを添付して送ってみてほしい」という意味だと思います。　二つ目のご質問ですが、私はDOS-BASICを触ったことがなく、 Read文、Data文、Restore文がどういった動作をするのかわからないので、 AB4への移植方法をお教えすることができませんn(_ _;)nスミマセンこちらの方はDOS-BASICに詳しい方、どうかフォローをお願いします(^ ^;) 　そもそもif文でお困りのようですので、私の思いつく対処法を挙げさせていただきますと、 if文はSelect Case文でも代用できますので、こちらを使ってコードを書き直してみるといいかもしれません。 (根本的な解決法にはならないので申し訳ないですが・・・(- -;) 　　もしかしたら見当違いのことを言ってしまってるかもしれませんが、もしよろしければ参考にしてみてください。

作成者:	r@PCLabo [ 2005年5月30日(月) 21:23 ]
記事の件名:
配列の初期化ができるようになったので、 Read a(0): Read a(1): Read a(2): Read a(3): Read a(4) Data 1,2,3,4,5 とせずに Dim a(4)=[1,2,3,4,5] とすればよいと思います。 Read関数を、配列の該当位置からデータを持ってくる関数として定義してみてはどうですか? 上のを実行した後に x=Read()とか。

作成者:	あらら [ 2005年5月30日(月) 21:30 ]
記事の件名:
あららです。早速、返信を頂きありがとうございます。職場では誰もプログラミングをする人などいなくて、誰にも聞けないのですが、教えてくれる人がいるというのは、心強いですね。　その後、何十回となく、ＩＦ文を書き換えては、コンパイルしました。しかし、問題と思われたＩＦ文を全部削除しても同じ症状が出てしまい、いよいよ・・・。なので管理人の山本さんに、ソースコードを送りました。

ページ 1 ／ 1	全ての表示時間は UTC+09:00 です
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/