ab.com コミュニティ

ActiveBasicを通したコミュニケーション
前回の訪問日時: 2019年10月18日(金) 17:42 現在時刻 - 2019年10月18日(金) 17:42

All times are UTC+09:00




 [ 3 件の記事 ] 
作成者 メッセージ
 記事の件名: Loop 何々
投稿記事Posted: 2007年3月21日(水) 10:49 
#N88BASIC
Dim i As Long
Do
Input "End = 1";i
Loop until i=1
Msgbox 0,"end"

10 Do
20 Input "End = 2";i
30 Loop until i=2
Msgbox 0,"end"
end

行番号をつけると終了しないのは仕様なんでしょうか?。


ページトップ
   
 
投稿記事Posted: 2011年3月30日(水) 13:18 
オフライン

登録日時: 2006年2月05日(日) 17:10
記事: 201
お住まい: 東京都
確認しました。
>行番号をつけると終了しないのは仕様なんでしょうか?。
そのような仕様ではありません。

しかし実際行番号つけると上記の様に正常に動作しないようです。

なのでできる限り行番号なしのコーディングをおすすめします。


ページトップ
   
 
投稿記事Posted: 2013年10月02日(水) 12:54 
オフライン

登録日時: 2006年2月05日(日) 17:10
記事: 201
お住まい: 東京都
LOOP命令に1から始まる行番号を指定するとコンパイルエラーになります。
確認バージョン AB4(Ver4.24)/AB5(CP3,CP4,CP5)

DIM A AS Long
A = 100
DO
10 LOOP UNTIL A > 0
20 DO
30 LOOP UNTIL A > 0
40 DO
50 LOOP UNTIL A > 0
END

AB4でコンパイル
TEST.abp(4) - 定数式にリテラル値、または定数以外のものが含まれています
TEST.abp(4) - "1,A" 無効な識別子です
TEST.abp(4) - 型が違います

AB5(CP5)でコンパイル
コンパイル中...
D:\APPLTEST\TEST.abp(4) : 定数式にリテラル値、または定数以外のものが含まれています。
D:\APPLTEST\TEST.abp(4) : "1" 無効な識別子です
D:\APPLTEST\TEST.abp(4) : 文法が間違っています。
D:\APPLTEST\TEST.abp(4) : 定数式にリテラル値、または定数以外のものが含まれています。
D:\APPLTEST\TEST.abp(4) : 内部エラー

-----------------------------------------------------
コンパイルは中断されました(エラー:5、警告:0)。

ご確認よろしくお願いします。


ページトップ
   
 
 [ 3 件の記事 ] 

All times are UTC+09:00


オンラインデータ

このフォーラムを閲覧中のユーザー: CCBot & ゲスト[0人]


トピック投稿: 不可
返信投稿: 不可
記事編集: 不可
記事削除: 不可
ファイル添付: 不可

ページ移動:  
Powered by phpBB® Forum Software © phpBB Limited
Japanese translation principally by ocean