[ZaerAllail]

اوضحها لك بشكل افضل

فرضاً لديك قاعدة بيانات بها جدولين 

الجدول الأول 

datatable1
يوجد به حقلين
username
password

الجدول الثاني
datatable2
يوجد به حقول خاصة ببيانات الموظفين مثلاً



وحتى يتمكن المستخدم من الدخول إلى النموذج الموجود به بيانات الموظفين في الجدول الثاني يجب عليه أولاً  إدخال إسم المستخدم وكلمة المرور الخاصة به والتي ستكون مسجله في الجدول الأول !

اتمنى أكون شرحت الفكره بشكل جيد !

أنا توصلت مع المحاوله إلى كود يعمل بشكل جيد وهو المرفق مع هذا الرد ولكن الغريب أنه قام بالتحقق من إسم المستخدم وكلمة المرور دون أن أحدد له الجدول المقصود ولست أعلم كيف !
إذا ممكن أحد يشرح هالنقطه اكون جدا شاكر له !

كود :

Imports System.Data.OleDb

Public Class LogIn    

Public con As New OleDbConnection("provider=microsoft.ace.oledb.12.0;" & "data source=" & Application.StartupPath & "\MyPassData.accdb")
Dim da As New OleDbDataAdapter
Dim dt As New DataTable

Private Sub ButtonToUserSghinIn_Click(sender As Object, e As EventArgs) Handles ButtonToUserSghinIn.Click

Dim UName As String = dt.Rows(0)("UserName") 'إسم المستخدم الموجود في الجدول الأول في قاعدة البيانات
Dim Upass As String = dt.Rows(0)("Passsword") 'كلمة  المرور الموجوده في الجدول الأول في قاعدة البيانات

       If TextUserNam.Text <> UName And TextUserPass.Text <> Upass Then
           MsgBox("بيانات إسم المستخدم وكلمة المرور غير صحيحة يرجى التأكد منها والمحاولة مره أخرى", vbInformation, "My Key")
           TextUserNam.Text = ""
           TextUserPass.Text = ""
           TextUserNam.Focus()
           Exit Sub
       Else End If

       MineF.Show()
       Me.Hide()

End Sub