السلام عليكم
لو سمحتوا اريد مساعده
ممكن احد يشرح لي كيف اعمل tree view
انا اعرف بعض الاشياء مثل اضافتها وكيفيه عمل شي بسيط
لكن انا ابغى اربطها بقاعده بيانات كبيره تتكون من جدولين
انا شفت امثله موجوده وهنا لكن الشي اللي مافهمته ايش هو الموديول وايش وظيفته
بــ tree view وكيف اعمله
وشكرا
رجاء ساعدوني
ضروري يااخوان
شكرا اخوي
لكن انا ابغى شرح لكيفيه ربط tree view بقاعده بيانات تتكون من جدولين
لانه صعبه اكتب المعلومات بالفيجوال...لانها كثيره جدا
ياليت يكون فيه طريقه ربط قاعده بيانات بااداه الشجره وتطلع مثلا اسم المعلومه في جهه اداه الشجره
ولما اضغط على الكلمه تنكتب لي المعلومات بتكست او ليست او اي شي على نفس الفورم
اخواني
انا فهمت كل شي الان لكن ظهرت لي مشكله وهي كيفيه ظهور المعلومات في تكست
مثلا
اريد عندما اضغط على كلمه موجوده في اداه الشجره تظهر لي معلوماتها الموجوده في قاعده بيانات على تكست
ماهو كود هذه العمليه
بلييييييييييييييز ساعدوني
انت مافهمتني
انا ابغى اشوف النتيجه على الفيجوال ماابغى اعمل بحث
ابغى لما اضغط على كلمه في التفرع من الشجره تطلع لي معلوماتها في تكست على الفيجوال
انا اعمل برنامج وضروري اعرف هذي الطريقه
بليييييييييز...معقوله مافيه احد يعرف
؟؟؟
إلى الزميلة ريماس:
البحث الذي يقصده المشرف عن طريق الفيجوال بيزيك
يمكنك مثلا استخدام الكود التالي:
Dim db As Database, rs As Recordset
Private Sub Form_Load()
Set db = OpenDatabase("E:\My Documents\My Data\QStoresXp.mdb")
Set rs = db.OpenRecordset("Items", dbOpenDynaset)
Do Until rs.EOF
TreeView1.Nodes.Add , , , rs!Name
rs.MoveNext
Loop
End Sub
Private Sub TreeView1_Click()
rs.FindFirst "Name='" & TreeView1.SelectedItem & "'"
Label1 = rs!Type
End Subآمل أن يفي بالغرض
وإذا كان هناك أي استفسار فأنا على أتم استعداد
تم تعديل هذه المشاركة بواسطة qushisha في 3 مايو 2006 في 00:38
الله في عون العبد ما كان العبد في عون أخيه
هذا الموضوع مغلق.