投稿日 | : 2005/02/28(Mon) 13:05 |
投稿者 | : ももたろう |
Eメール | : |
URL | : |
タイトル | : Re^6: MSHFlexGridでのNULL表示について |
> > 新しい問題で、mdbにNULL値がある場合、検索してもヒットされてこない行があります。
> その説明で理解するのは、かなり酷ですね……。(^^;
>
> 「どのようなコードで検索しているのか」が一切書かれていないので、
> それだけでは何とも判断できません。
確かに!そうですよね、すみません、下記にコードを明記します。
Dim strSQL As String
Dim i As Long
Dim rst As DAO.Recordset
Dim DB As DAO.Database
strSQL = "SELECT * FROM CR5000 WHERE partName like '" & txtpartName.Text & _
"' and partcode like '" & txtPartCode.Text & _
"' and GTCode like '" & txtGTCode.Text & _
"' and Maker like '" & txtMaker.Text & _
"' and MakerCode like '" & txtMakerCode.Text & _
"' and value like '" & txtvalue.Text & _
"' and NumberOfPin like '" & txtNumberOfPin.Text & "'"
Debug.Print strSQL
Set DB = OpenDatabase(App.Path & "\cr5000.mdb")
Set rst = DB.OpenRecordset(strSQL)
i = 1
With rst
Do While Not .EOF
Debug.Print i & " " & rst![partName] & " " & rst![SearchCode] & " " & rst!
[PartsClass] & " " & _
rst![GTCode] & " " & rst![PartCode] & " " & rst![JapanesePartsName]
& " " & _
rst![NumberOfPin]
.MoveNext
i = i + 1
Loop
End With
rst.Close
DB.Close
Set rst = Nothing
Set DB = Nothing
> > 但し、よくわからないんですが、NULL値があってもヒットされてくる行もあります。
> 1. 『NULL』と『長さゼロの文字列』を混同していないか。
> 2. 『NULL』の項目に対して「= 演算子」で比較していないか。
> などを良く確認してみてください。
確認してから返信しますので、よろしくお願いします。