VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2005/12/06(Tue) 19:07 |
| 投稿者 | ： kishitatsu |
| ＵＲＬ | ： |
| タイトル | ： DBGridエラー'3061' |
お世話になります。
VB4.0→VB6.0環境に変更するため、
当サイト及び以下の本を参考にしながら修正しております。
下記の個所にてエラーとなりましたが
対処方法がわかりません。
ご教授の程、よろしくお願い致します。
【環境】
OS:WindowsXP SP2
VBバージョン:VB6.0 ENTERPRISE SP6
発行：日経ＢＰ社 2000年
「３週間完全マスタ Visual Basic6.0 データベース編」
400ページ
Data2.Refresh にて
「実行時エラー'3061':
パラメータが少なすぎます。１を指定して下さい。」
Private Sub Data1_Reposition()
Dim strSQL As String
Dim strKey As String
'
' グリッドにデータをロードするためのSELECTを作成する
If Text1(0).Text = "" Then
strKey = "0"
Else
strKey = Trim(Text1(0).Text)
End If
'
strSQL = "SELECT ISBN,Title,YearPub FROM Titles WHERE PubID =" & strKey
Data2.RecordSource = strSQL '連結データ・コントロールを設定する
Data2.Refresh 'データ・コントロールの表示を更新する
DBGrid1.ReBind 'グリッドの表示を更新する
End Sub
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）