20-12-14, 04:53 PM
السلام عليكم
كيفك ان شاء الله طيبين
اخواني
اريد عمل برنامج
اضغط زر
يضهر لي جمله محدده مثل abdullahs1 في ال(textbox)
يعني برنامج تخمين من لسته محدده
اتمنى المساعده باسرع وقت وشكرا
برنامج تخمين من لسته محدده
|
20-12-14, 04:53 PM
السلام عليكم
كيفك ان شاء الله طيبين
اخواني
اريد عمل برنامج
اضغط زر
يضهر لي جمله محدده مثل abdullahs1 في ال(textbox)
يعني برنامج تخمين من لسته محدده
اتمنى المساعده باسرع وقت وشكرا
20-12-14, 05:41 PM
(20-12-14, 04:53 PM)3booy201 كتب : وضح كيف تخمين لسته معينة هوا اللسة رقم ولا عندك كذا لسته بالرنامج ايش بالضبط
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها
تم الشكر بواسطة: سعود
20-12-14, 06:39 PM
كود : Dim a As Integer = Nothing اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء، اللهم أصلح لي ديني الذي هو عصمة أمري، وأصلح لي دنياي التي فيها معاشي، وأصلح لي آخرتي التي فيها معادي، واجعل الحياة زيادة لي في كل خير، واجعل الموت راحة لي من كل شر
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي جدي وهزلي وخطأي وعمدي وكل ذلك عندي، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
تم الشكر بواسطة: 3booy201
اخواني لم تفهموا قصدي
انا لدي الان لسته محدده من عندي وهي اسم مستخدم وكلمة مرور مثلا: abood00-1919 ahmad2-3939 اريد ان اضغط زر ويظهر احد الحسابات فالتكست بوكس وشكرا (20-12-14, 09:08 PM)3booy201 كتب : اخواني لم تفهموا قصدي دامك تعرف تبرمج استخدم خاصية item
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها
21-12-14, 06:23 PM
(20-12-14, 09:08 PM)3booy201 كتب : اخواني لم تفهموا قصدي نفس الشي ونفس الطريقة الفرق كيف خزنت هذه القائمة؟ ان كان في Listbox فكما ورد وان كان في غيرها فاخبرنا. اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء، اللهم أصلح لي ديني الذي هو عصمة أمري، وأصلح لي دنياي التي فيها معاشي، وأصلح لي آخرتي التي فيها معادي، واجعل الحياة زيادة لي في كل خير، واجعل الموت راحة لي من كل شر
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي جدي وهزلي وخطأي وعمدي وكل ذلك عندي، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
25-12-14, 06:25 PM
مشكورين هذا الكود الي احتاجه
Dim a As Integer = Nothing a = Int(Rnd() * ListBox1.Items.Count) On Error Resume Next TextBox1.Text = ListBox1.Items.Item(a) If ListBox1.Items.Count = 0 Then TextBox1.Clear() End If ListBox1.Items.Remove(ListBox1.Items.Item(a)) بس فيه مشكلة بالكود انه يختار من الليستبوكس بالترتيب ابغى اخليه عشوائي وشكرا
25-12-14, 08:25 PM
رفع...........
اخي الكريم الكود جربته وهو يشكل عشوائي
ولو حبيت من غير Listbox كود : Public Class Form1 المثال المحدث اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء، اللهم أصلح لي ديني الذي هو عصمة أمري، وأصلح لي دنياي التي فيها معاشي، وأصلح لي آخرتي التي فيها معادي، واجعل الحياة زيادة لي في كل خير، واجعل الموت راحة لي من كل شر
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي جدي وهزلي وخطأي وعمدي وكل ذلك عندي، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
|
|