منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] اظهار كلمة المرور - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] اظهار كلمة المرور (/showthread.php?tid=44378)

اظهار كلمة المرور - ali_ahmed12 - 25-11-22

السلام عليكم
عندما اضغط علي عنصر محدد في ليست بوكس يظهر اسم المستخدم
لكن كلمة المرور تظل كلمه اخيره
اريده تظهر كلمة المرور لكل مستخدم اضغط عليه
هدا كود
كود :
Private Sub ListBox1_Click(sender As Object, e As EventArgs) Handles ListBox1.Click
       user_name.Text = ListBox1.SelectedItem.ToString
       For i = 0 To dt.Rows.Count - 1
           user_password.Text = dt.Rows(i).Item("user_password")

       Next
   End Sub


RE: اظهار كلمة المرور - asmarsou - 25-11-22

(25-11-22, 08:41 PM)ali_ahmed12 كتب : السلام عليكم
عندما اضغط علي عنصر محدد في ليست بوكس يظهر اسم المستخدم
لكن كلمة المرور تظل كلمه اخيره
اريده تظهر كلمة المرور لكل مستخدم اضغط عليه
هدا كود
كود :
Private Sub ListBox1_Click(sender As Object, e As EventArgs) Handles ListBox1.Click
       user_name.Text = ListBox1.SelectedItem.ToString
       For i = 0 To dt.Rows.Count - 1
           user_password.Text = dt.Rows(i).Item("user_password")

       Next
   End Sub
و عليكم السلام و رحمة الله و بركاته
راجع الموضوع التالي فربما تجد حل لمشكلتك
http://vb4arb.com/vb/thread-31025.html

RE: اظهار كلمة المرور - ali_ahmed12 - 26-11-22

(25-11-22, 11:27 PM)asmarsou كتب :
(25-11-22, 08:41 PM)ali_ahmed12 كتب : السلام عليكم
عندما اضغط علي عنصر محدد في ليست بوكس يظهر اسم المستخدم
لكن كلمة المرور تظل كلمه اخيره
اريده تظهر كلمة المرور لكل مستخدم اضغط عليه
هدا كود
كود :
Private Sub ListBox1_Click(sender As Object, e As EventArgs) Handles ListBox1.Click
       user_name.Text = ListBox1.SelectedItem.ToString
       For i = 0 To dt.Rows.Count - 1
           user_password.Text = dt.Rows(i).Item("user_password")

       Next
   End Sub
و عليكم السلام و رحمة الله و بركاته
راجع الموضوع التالي فربما تجد حل لمشكلتك
http://vb4arb.com/vb/thread-31025.html
ليست نفس مشكلة

RE: اظهار كلمة المرور - غزة العزة - 02-06-24

PHP كود :
Private Sub ListBox1_Click(sender As Object, e As EventArgs) Handles ListBox1.Click
    If ListBox1.SelectedItem IsNot Nothing Then
        Dim selectedUserName As String = ListBox1.SelectedItem.ToString()
        user_name.Text = selectedUserName
        
        ' ابحث عن اسم المستخدم في DataTable
        For Each row As DataRow In dt.Rows
            If row("user_name").ToString() = selectedUserName Then
                user_password.Text = row("user_password").ToString()
                Exit For ' عند العثور على المستخدم المطلوب، لا داعي لمتابعة الحلقة
            End If
        Next
    End If
End Sub 

شرح التعديلات:
التحقق من وجود عنصر محدد: الكود يبدأ بالتحقق من أن هناك عنصرًا محددًا في ListBox1 لتجنب الأخطاء في حالة عدم تحديد أي عنصر.
تعيين اسم المستخدم: تعيين user_name.Text ليكون مساويًا للاسم المحدد في ListBox1.
البحث في DataTable: استخدم حلقة For Each للبحث عن الصف الذي يحتوي على اسم المستخدم المحدد. عند العثور عليه، يتم تعيين كلمة المرور المناسبة إلى user_password.Text.
إيقاف الحلقة: بمجرد العثور على المستخدم، يتم استخدام Exit For لإنهاء الحلقة لتجنب عمليات بحث غير ضرورية.
بهذا الشكل، ستتمكن من عرض كلمة المرور الصحيحة للمستخدم المحدد في ListBox1.