VB初心者友の会 - 超初心者専用Q&A掲示板過去ログ

> Do While i < 11
>   i = i + 1 
素直に、Forループじゃいけないんですか？ (^_^;)

>   sql = "SELECT FROM テーブル名 WHERE 列名=" & 配列変数(i)
SELECT句に、何も指定されていませんね。
行数を数えるのなら、SELECT COUNT(*) FROM 〜 にしましょう。

>   If ゼロ行ならば−★
ヒント１：Recordsetオブジェクトを使います。
ヒント２：先に書いた、COUNT SQL関数を使わないのであれば、RecordCountプロパティが使えます。

＃ ヘルプの中に使用例があります。

> > Do While i < 11
> >   i = i + 1 
> 素直に、Forループじゃいけないんですか？ (^_^;)

そうですね、、、Forループの方がスッキリしますね。f^^;
 
> >   sql = "SELECT FROM テーブル名 WHERE 列名=" & 配列変数(i)
> SELECT句に、何も指定されていませんね。
> 行数を数えるのなら、SELECT COUNT(*) FROM 〜 にしましょう。

あっ、単なる入力漏れでした。f^_^;
全列指定の「SELECT * FROM ・・・」と書きたかったのです。
 
> >   If ゼロ行ならば−★
> ヒント１：Recordsetオブジェクトを使います。
> ヒント２：先に書いた、COUNT SQL関数を使わないのであれば、RecordCountプロパティが使えます。
> ＃ ヘルプの中に使用例があります。

ヘルプで調べました。 目的の箇所を発見できました。  どうも有り難うございました。

> 全列指定の「SELECT * FROM ・・・」と書きたかったのです。
件数を調べたいだけならば、それはトラフィックの無駄ですよ。
（レコードサイズが大きいほど、無駄が大きくなります）

件数を調べるなら、COUNTを使いましょう。

>>>   If ゼロ行ならば−★
>> ヒント１：Recordsetオブジェクトを使います。
>> ヒント２：先に書いた、COUNT SQL関数を使わないのであれば、RecordCountプロパティが使えます。
>> ＃ ヘルプの中に使用例があります。
> ヘルプで調べました。 目的の箇所を発見できました。  どうも有り難うございました。
もし、ゼロ行かどうかを知りたいだけであれば、Recordsetを開いた直後に、
RecordsetのEOFプロパティを調べてもＯＫです。

たとえば、
  Set RS = 〜.OpenRecordset(SQL)
  If RS.EOF Then
      MsgBox "データ無し！"
  Else
     RS.Edit
     RS!列1 = Text1.Text
     RS!列2 = Text2.Text
     RS.Update
     MsgBox "更新完了！"
  End If
  RS.Close

のような感じです。

> もし、ゼロ行かどうかを知りたいだけであれば、Recordsetを開いた直後に、
> RecordsetのEOFプロパティを調べてもＯＫです。
> たとえば、・・・

ゼロ行かどうかを知りたいだけです。f^_^;
 
具体例までご丁寧に有り難うございました。