-1

次のように vb.net で自動インクリメント番号を作成したい: -

01, 02, 03, 04

等々、順調です。

VB NET 2008 接続 OleDb から MS Access を使用しています。

このエラーが発生します

型 'DBNull' および型 'integer' に対して演算子 '+' が定義されていません

テーブルに空のレコードがある場合。しかし、テーブルに少なくとも1つのレコードがある場合は機能しています

これが私のコードです

Try
    cmd = New OleDbCommand(" SELECT MAX(sampleID) FROM 1BK ", cnnOLEDB)
    Dim dr As OleDbDataReader = cmd.ExecuteReader
    If dr.Read Then
        TextBox1.Text = dr.Item(0) + 1
    Else
        TextBox1.Text = "20120701"
    End If
Catch ex As Exception
    MsgBox(ex.Message)
End Try
4

1 に答える 1

0

これはおそらく、dr.Item(0)が null であり、追加できないためです。最初にチェックを実行してそれを確認してdr.Item(0) != nullから、追加を行います。null の場合は、TextBox1.Text = [YOURSTARTERVALUE];

于 2012-07-11T01:19:32.803 に答える