[解決済み] 1つまたは複数の必須パラメータに値が指定されていない

質問

以前と同じコードを使っても、いつも厄介なエラーが発生します。しかし、他のフォームに適用すると、上記のようなエラーが発生します。 以下は私のコードです。

Imports System.Data.OleDb
Public Class Updater2
    Public adminID As String
    Public adminName As String
    Public adminPass As String

    Private con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Jet OLEDB:Database Password=nrew123$%^;")
    Private com As OleDb.OleDbCommand

    Public Sub New()
        con.Open()
        com = New OleDb.OleDbCommand("Select * from admintable")
        com.Connection = con



    End Sub

    Public Sub updates()
        com.CommandText = "UPDATE admintable SET AdminName = '" & adminName & "', AdminPassS = '" & adminPass & "' WHERE ID = '" & adminID & "'"
        com.ExecuteNonQuery()

    End Sub
End Class

そしてこれが、データを更新しようとするボタン内のコードです。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        shikai.adminID = textbox1.text
        shikai.adminName = TextBox4.Text
        shikai.adminPass = TextBox3.Text






        shikai.updates()
        MsgBox("Successfully updated!")
    End Sub

何が問題なのでしょうか？

解決方法は？

このエラーの通常の理由は、値の欠落またはスペルミスにあります。adminNameがNullか長さ0の文字列である可能性が高いと思われます。