ربط قاعدة بيانات access بado.net(سؤال)

عليك السلام اخي الكريم

نعم يمكنك ذالك

اولا اذا كنت تستخدم الوضع المنفصل وهو الافضل

شكرا اخ A.S. واذا اريد ارجع قيمة الكومبو الى قاعدة البيانات

السلام عليكم

في حاله انك تريد ارجاع قيمه الكمبو بكس

في حدث الضغط على الكمبو او حدث تغير ال index اسند قيمه الخاصيه selectedvalue الى متغير الاستعلا م مثلا

الكود التالي يقوم باضفه بيانات طالب حيث نقوم باختيار القسم الذي يدرس فيه الطلاب من الكمبو

Imports System.Data.OleDb
Imports System.Data
Public Class Form1
	Dim sql As String = "insert into student values(@name,@age,@deptno)" 'على اساس ان جدول الطلاب فيه حقل رقم القسم
	Dim conn As New OleDbConnection("connString")
	Dim dt As New DataTable
	Dim da As New OleDbDataAdapter("select deptno,dname from dept", conn)

	Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    	'التعبئه باستخدام الوضع المنفصل
    	da.Fill(dt)
    	cmbStudentDept.DataSource = dt
    	cmbStudentDept.DisplayMember = "dname"
    	cmbStudentDept.ValueMember = "deptno"
	End Sub

	Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
    	'الحفظ باستخدام الوضع المتصل
    	Dim cmd As New OleDbCommand(sql, conn)
    	cmd.Parameters.AddWithValue("@name", txtStudentName.Text)
    	cmd.Parameters.AddWithValue("@age", txtStudentAge.Text)
    	cmd.Parameters.AddWithValue("@deptno", cmbStudentDept.SelectedValue)
    	Try
        	conn.Open()
        	If cmd.ExecuteNonQuery() > 0 Then
            	MsgBox("تمت عمليه الاضافه بنجاح")
        	End If

    	Catch ex As Exception
        	MsgBox(ex.Message)
    	Finally
        	conn.Close()

    	End Try
	End Sub
End Class