VB6.0 ユーザー定義を使って (ID:125908)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 まずマルチはやめましょう。 それと、あちらのサイトにはちゃんと「知らずに」マルチしてしまった事への 謝罪をいたしましょう。 さて・・・ユーザー定義？配列？ 何故使いたいのかわからないけど、使わない方法。 Dim rs As New ADODB.Recordset を Private rs As ADODB.Recordset と書き換え、(General)の部分に移動しましょう。 （どのプロシージャにも属さないとこ） または、標準モジュールを追加して、そこに Public rs As ADODB.Recordset としてもよいです。 そうすると、このCommand1_Click以外からでも Set rs = Nothing しない限り使えますので、Command1_Clickで検索結果をレコードセットに格納した後であれば、前ボタン、次ボタンなどで rsオブジェクトのMoveNextメソッドを実行する事によってカレントレコードの移動が出来ます。 #でもこれってあまりに基本中の基本なので、 もしこれを判ってないのであればこの後も厳しいかな？ きちんとrsオブジェクトの後始末やら、検索結果を格納する前の 移動ボタンの制御やら・・・・