人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

エラーが起きるんですけど、対処してもまた同じエラーが起きてしまいます。
今、下のようなのを作っていますが、エラーが起きて対処しても同じエラーが何回も起きてしまいます ちなみにエラー内容は、「型が一致していません:nextC」です
このような流れで作っています
1.Inputで数を入力してくださいとだし、打つ
2.その打った数とあらかじめ設定した数が一致すれば正解と出す
それよりも小さい場合 もっと大きい 大きい場合 もっと小さい
と出し、もう一回1と同じ画面を出す。 3回設定でやっています。
どこが間違っているのか教えてください
尚、.vbsで保存しています。
Dim AAsInteger
Dim BAsInteger
Dim CAsInteger


A = 5
For C = 1 To 3
B = InputBox("数は")
If B = A Then
MsgBox ("正解"): Exit For
End If
If B < A Then
MsgBox ("もっと大きい")
Else
MsgBox ("もっと小さい")
End If
NextC
Next

●質問者: 311m9kizna
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● きゃづみぃ

NextC って Next cですか?

Nextが 二つありますが、たぶん Nextcが 無視されてるんだと思われます。

あと
Dim AAsInteger
って AAsInteger という 変数を宣言していることになると思いますが。


311m9kiznaさんのコメント
Dim A AsIntegerに、するということになるんですか? そうすると、「ステートメントの不正です」と出てしまうんですが、対処法がわかるんであれば教えてください。

きゃづみぃさんのコメント
>|vb| Dim A Dim B Dim C A = 5 For C = 1 To 3 B = InputBox("数は") If B = A Then MsgBox ("正解"): Exit For End If If B < A Then MsgBox ("もっと大きい") Else MsgBox ("もっと小さい") End If Next ||<

きゃづみぃさんのコメント
http://vbscript.pgtop.net/category/17729732-1.html

311m9kiznaさんのコメント
わざわざ有難うございます。

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ