السلام عليكم
كيف الحال؟
إن شاء الله بخير ؟؟
الموضوع مابين من عنوانة
سوأل شنو كواد الانتقال من فورم إلى الفورم الثاني ممكن ومع الشرح ( فيجوال بيسك 2008)
وشكرا
سوأل شنو كواد الانتقال من فورم إلى الفورم الثاني ممكن ومع الشرح
اضف زر او قائمه في الفورم الأول واضغط عليها مرتين , سينقلك الى محرر الأكود اكتب في المكان المحدد
اسم الفورم ثم show
مثلا
Form2.show
واذا اردت ان تقوم بعمليه عكسيه من الفورم الثاني الى الفورم الاول اكتب
Form1.show
هذا كل شي بكل بساطه
انصحك بقراءة كتب للمبتدئين في الدوت نت او الاستفاده من الدروس التفصيلية الموجوده في المنتدى.
احمد
.
ahm631@hotmail.com
العربي2004 كتب:اضف زر او قائمه في الفورم الأول واضغط عليها مرتين , سينقلك الى محرر الأكود اكتب في المكان المحدد
اسم الفورم ثم show
مثلا
Form2.show
واذا اردت ان تقوم بعمليه عكسيه من الفورم الثاني الى الفورم الاول اكتب
Form1.show
هذا كل شي بكل بساطه
انصحك بقراءة كتب للمبتدئين في الدوت نت او الاستفاده من الدروس التفصيلية الموجوده في المنتدى.
احمد
مشكووووووووووووووووور بس ممكن تعطين الرابط مال كيتاب المبتدئين
سوأل ثاني شلون اسوي كلمة مرور لدخول إلى الفورم الثاني يعني ابي textbox يكتب دخلة كلمة المرور واحط زر على شن يذ كتب كلمة المرور يضغط على الزر
بعد ما تسوي ال form تخلي زر وتحدد بي شرط التحقق من كلمة المرور
if textbox.text=" كلمة المرور" then
form.hide
form2 .show
else
msgbox"كلمة المرور خاطئة"
end if
جربة واي سوأل اني حاضر
إذا كان عندي زر خروج و زر دخول و كومبوكس و تكس بوكس كيف أخلي في كومبوكس أسم وتكس بوكس رقم السري للدخول.
*انتمي إلى عالم البرمجة*
hack99 كتب:إذا كان عندي زر خروج و زر دخول و كومبوكس و تكس بوكس كيف أخلي في كومبوكس أسم وتكس بوكس رقم السري للدخول.
ع حسب فهمي لطلبك , تريد من المستخدم يختار الأسم من الـ combobox ؟ (بتكون مكونه من أسماء أشخاص أنت محددهم ) و يدخل في الـ text الرقم السري ..
عند أمر الدخول ,
ضع الشرط .. ليتحقق من الـ combobox و الـ text .. ,
إذا لم يكن المطلوب , وضح أكثر ..
بالتوفيق .. ,
سبحآن الله وبحمده .. سبحآن الله العظيم .. ,
كذاك أنا أريد كما أنت ذكرت و أرجوا يكون مع الكود المشروح .
أنا جربت هذا الكود =
If TextBox1.Text = " " Then
Me.Hide()
Form1.Show()
Else
MsgBox(" ")
End If
*انتمي إلى عالم البرمجة*
hack99 كتب:كذاك أنا أريد كما أنت ذكرت و أرجوا يكون مع الكود المشروح .أنا جربت هذا الكود
If TextBox1.Text = " " Then Me.Hide() Form1.Show() Else MsgBox(" ") End If
أخي الفاضل , الكود اللي كتبته راح يشيك على الـ text فقط , أضف عليه شرط الـ combobox..
بصراحه أنا ما فهمت .. ليه الأسماء تبيها في combobox .. لو تخليها في text :wink:
وشي ثاني .. عندك قاعدة بيانات ؟
بالتوفيق ,
سبحآن الله وبحمده .. سبحآن الله العظيم .. ,
لأ أنا ما عندي قاعدة بيانات لأني ما أعرف كيف أسوي قاعدة بيانات أنا بعمل شرح عن طريق الصور :
إضغط على الصور للتكبير
تم تعديل هذه المشاركة بواسطة hack99 في 10 مايو 2010 في 08:10
*انتمي إلى عالم البرمجة*
فرضا لو كان عندنا في الـ combobox أسماء ..
أحمد الرقم السري ماله 123
فيصل 456
بيكون الكود كالتالي في أمر الدخول :
If ComboBox1.SelectedItem = "Ahmad" And TextBox1.Text = "123" Then
MsgBox("Hello")
ElseIf ComboBox1.SelectedItem = "Faisal" And TextBox1.Text = "456" Then
MsgBox("Hello")
Else
MsgBox("Error ")
End Ifبالتوفيق ,
سبحآن الله وبحمده .. سبحآن الله العظيم .. ,
السلام عليكم ورحمة الله وبركاته
انت تريد عمل مستخدمين لبرنامجك فليس بالضرورة قاعدة بيانات وان كان الافضل قاعدة بيانات هناك طريقة وهي عمل ملف نصي يأخذ مثلاً نفس مسار البرنامج تضعه في مجلد Debug وتعطيه اسم مثلاً mytest.txt
وبعدين زر في برنامج وتكت الكود التالي:
Dim StreamR As New IO.StreamReader(Application.StartupPath & "\mytest.txt")
Dim x As String
Do
x = StreamR.ReadLine
If x <> "" Then
Dim LINE_split() As String
LINE_split = Split(x, ",")
'MsgBox(Trim(LINE_split(1)))
'MsgBox(Trim(LINE_split(0)))
If Me.TextBox2.Text = Trim(LINE_split(1)) And Me.TextBox1.Text = Trim(LINE_split(0)) Then
Me.Hide()
Form1.Show()
StreamR.Close()
Exit Sub
End If
Else
Exit Do
End If
Loop