列名が無効です

For hcnt = 1 To 18
w1_kin = 0
cmd.CommandText = "SELECT sum(sisitu_db) FROM syosai " _
& "WHERE hno_db = hcnt "

w1_kin = cmd.ExecuteScalar() + w1_kin
省略
NEXT
テーブルの列hno_dbにあるコード１から１８毎の金額合計を求める
のですが、上記の式（コード1の場合）では「hcntは列名の無効」となります。
hno_db = 1 では正しく実行されます。
宜しくお願いします。

No.2 ベストアンサー 回答者： dbohunger 回答日時： 2008/02/14 20:24

>言語はSqlseverです

「Sqlserver」という言語はありません。
きっと「Visual Basic」ですね。

すでに shimix さんから的確なアドバイスが付いていますが、
意味が分かっていないようです。

>For hcnt = 1 To 18
としているので、「hcnt」は変数です。
それをダブルクォーテーション「"」で囲ってしまっては
単なる文字列になってしまい、変数「hcnt」の「内容」は
取り出せませんよ。

フォームにコマンドボタンを１個配置し、次のコード（３行目から４行目を入力）を実行してみると、何が起こっているかわかるはずです。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim hcnt As Integer = 1
MessageBox.Show("hcnt=" & hcnt)
End Sub

この回答へのお礼

有難うございました。
hcntが単なる文字列になってしまうのですね。
理解していませんでした。　
デバックの方法も有難うございました。

お礼日時：2008/02/14 20:58

No.1 回答者： shimix 回答日時： 2008/02/11 14:36

言語が何かわかりませんが、hcntをリテラル中に書いても勝手に展開はされないと思います。

　　cmd.CommandText = "SELECT sum(sisitu_db) FROM syosai " & "WHERE hno_db = " & hcnt & ・・・

とかでは？

この回答へのお礼

早速有難うございます　言語はSqlseverです
やはり出来ないのでしょうか？

お礼日時：2008/02/11 14:54