ارجوكم محتاج كود عرض فورم بطريقة عشوائية

سؤال : أنت بتعمل برنامج مسابقات ؟

لأن لو كده فقواعد البيانات هى الحل.

فعلا انا بعمل برنامج مسابقات ولكن للاسف معلوماتي بقواعد البيانات غير كبيرة و كنت عايز كود يظهر فورمات بطريقة عشوائية علشان اكون فاهمة في المناقشة باذن الله

فعلا انا بعمل برنامج مسابقات ولكن للاسف معلوماتي بقواعد البيانات غير كبيرة و كنت عايز كود يظهر فورمات بطريقة عشوائية علشان اكون فاهمة في المناقشة باذن الله

اقترح عليك الحل التالي

انشئ اجراء يكون له علاقة بالرقم المدخل

Private Sub Command1_Click()

showform

End Sub

Public Sub showform()

Dim c As Integer

Randomize

c = Int(4 * Rnd) + 1

Text1 = c

Select Case c

Case 1

Form1.Show

Case 2

Form2.Show

Case 3

Form3.Show

Case 4

Form3.Show

End Select

End Sub

بالتوفيق وانا جاهز اذا في اسئلة اخرى

من الخطأ استعمال Forms فى الموضوع ده , فى فكرة تانية بدل قواعد البيانات لمعلمى Keith Stanier :

MvQuiz with Animation