[VB.NET]---> ไม่แอดข้อมูลลงในตารางครับ ลองไล่ดูเเล้วไม่รู้ว่าผิดตรงไหน

Imports System.Data
Imports System.Data.OleDb

Public Class Form1
    Private _conn As OleDbConnection
    Private _cmd As OleDbCommand


    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim sql As String = ""
        sql = "INSERT INTO user(user_fname) values('1')"

        'Dim conDBACC As New ConnectDBACC(nameFileAcc)
        'conDBACC.ExecuteCommand(sql)

        _cmd = New OleDbCommand(sql, _conn)
        _cmd.ExecuteNonQuery()

        '_cmd.Parameters.AddWithValue("Fname", TextBox1.Text)
        '_cmd.Parameters.AddWithValue("Lname", TextBox2.Text)

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        _conn = New OleDbConnection(_conStr)
        _conn.Open()
    End Sub

   
End Class