الحفظ في حقل منطقي

أخى جرب هذا

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connection As New OleDb.OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users.mdb;")
        Dim command As New OleDb.OleDbCommand("INSERT INTO Users (User, IsMale) VALUES ('amr', 'yes')", connection)

        connection.Open()
        command.ExecuteNonQuery()
        connection.Close()
    End Sub
End Class

شكراً