Ошибка: нет значений для одного или нескольких параметров.

Итак, всякий раз, когда я пытаюсь вставить данные в мою базу данных доступа, это не работает...

Ошибка говорит, что значение не указано...

это мой код

Imports System.IO
Imports System.Data.OleDb
Public Class halaman_daftar_anggota
Dim Conn As OleDbConnection
Dim da As OleDbDataAdapter
Dim ds As DataSet
Dim CMD As OleDbCommand

Dim LokasiDB As String
Sub Koneksi()
    LokasiDB = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=perpustakaan.accdb"
    Conn = New OleDbConnection(LokasiDB)
    If Conn.State = ConnectionState.Closed Then Conn.Open()
End Sub
Private Sub halaman_daftar_anggota_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Koneksi()
    da = New OleDbDataAdapter("Select * from data_anggota", Conn)
    ds = New DataSet
    ds.Clear()
    da.Fill(ds, "data_anggota")
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim dialog As OpenFileDialog = New OpenFileDialog()

    dialog.Title = "Browse Foto"
    dialog.Filter = "image files(*.png; *.bmp; *.jpg;*.jpeg; *.gif; |*.png; *.bmp; *.jpg;*.jpeg; *.gif;)"
    If dialog.ShowDialog() = Windows.Forms.DialogResult.OK Then
        PictureBox1.Image = Image.FromFile(dialog.FileName)
    End If

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim simpan As String = "INSERT INTO data_anggota (nomor_induk,nama_siswa,kelas_siswa,nomor_anggota,foto) values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "',@image)"
    Dim ms As New IO.MemoryStream()
    PictureBox1.Image.Save(ms, Imaging.ImageFormat.Jpeg)
    Dim data As Byte() = ms.ToArray()
    Dim p As New OleDbParameter("@image", OleDbType.LongVarBinary)
    p.Value = data
    CMD = New OleDbCommand(simpan, Conn)
    CMD.ExecuteNonQuery() <- the error located
    MsgBox("Berhasil")
End Sub

Я предполагаю, что изображение не вставляется. (фото - это старый объект в базе данных), но, учитывая, что я абсолютный новичок в этом, поэтому я не могу сказать....