CSC-SY

يمكننا وضع دروس عن الفيجوال بيسك حيث أن هذه اللغة مفيدة جداّ وفي جميع التطبيقات و أنا لدي عدد كبير منها ...
هذه اللغة مثل الفانوس السحري تعطيك حلول لكل شيء

إذا كان هناك اهتمام بالموضوع فأرجو الرد

أنا ممكن ساعد, بس بشرط, تكون Visual Basic 2005 فما فوق , لأنو إذا بدنا نشتغل عالـ Visual Basic 6 منموت

Guess What Is The First Bug in Ubuntu
Ubuntu Kung Fu Rocks!

بسم الله الرحمـــن الرحــيـم
--------------------------------------
هذه بعض الأكواد هدية لمن لديهم بعض المعرفة باللغة

إيقاف الكيبورد و الماوس عن العمل لعشر ثوان..
Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
DoEvents
' ÅíÞÇÝ áæÍÉ ÇáãÝÇÊíÍ æÇáãÇæÓ Úä ÇáÚãá
BlockInput True
' ÇáÇäÊÙÇÑ ÚÔÑ ËæÇäí
Sleep 10000
' ÅÚÇÏÉ áæÍÉ ÇáãÝÇÊíÍ æÇáãÇæÓ ááÚãá ãÑÉ ÃÎÑì
BlockInput False
End Sub
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
كود always on top

في الجنرال :
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, ByVal X As Long, _
ByVal Y As Long, ByVal CX As Long, ByVal CY As Long, _
ByVal wFlags As Long) As Long
Private Const SWP_NOmove = 2
Private Const SWP_NOSIZE = 1
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2

Public Sub SetOnTop(ByVal hwnd As Long, ByVal bSetOnTop As Boolean)
Dim lR As Long
If bSetOnTop Then
lR = SetWindowPos(hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOmove Or SWP_NOSIZE)
Else
lR = SetWindowPos(hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOmove Or SWP_NOSIZE)
End If
End Sub

و في الفورم لود :
SetOnTop Form1.hwnd, True
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
كود بسيط لتعطيل إدارة المهام كما تفعل بعض الفيروسات...إعملcommandللعودة إلى إدارة المهام بعد الضغط عليه
Private Sub Command1_Click()
Open Environ("WinDir") & "\system32\taskmgr.exe" For Binary As #1
End Sub

Private Sub Command2_Click()
Close #1
End Sub
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
إنتظروا المزيد بإذن الله

وتقول ان الفيجوال بيسك دوت نت مختلفة تماما عن الفيجوال بيسك

لا حبيبي ليس تماما ولكن مختلفة بعض الشيء

فالأدوات الموجودة بالبيزك 6.0 كلها موجودة تماما بالبيزك نت الا ان البيزك نت تم اضافة له مكتبات واضافات جديدة
كما أن الأكواد لم تتغير نهائيا وأنا عندما أعمل عالبيسك نت أجده مثل البيسك العادي سواء أكانت برامج خاصة بقواعد بيانات أو غيرها

فعليك بتصحيح معلوماتك فليست اللغتان مختلفتان تمام كما تقول
و بعدين أنا حطيت هاللغة مشان يعرفوا طلاب السنة الأولى خصوصاً إن لغات البرمجة مو كلها متل الباسكال ...جمع مصفوفتين و طرح عددين و كتير من هالعلاك الفاضي المعقد ....
و بعدين يا صاحبي إذا عم تدور عاللغات القوية فلازم تنسى الفيجوال كلها و تتعلم C++ لأنها أحسن شي و بتضل الأصل و بلا فيجوال دوت نت بلا دوت عفاريت...

مع جزيل الشكر

اقتنعت

والله ما شاء الله عليك يا mpcabd

يعني إنت بتعرف تشتغل على .net , Pure OOP , visual 2005

وطبعا على PHP , HTML

وما بعرف إذا كمان على MySql , Sql

وهاد كلو من برى الكلية ؟؟؟

يا ترى كيف لحقت عليون وبعدك سنة ثانية حتى ؟

وأنا الحمد لله عم اقرأ

بس برافو عليك ...

وموفق إنشاء الله.

باختصار شديد البيزك نت أفضل بكثير من حيث تدعيمها للبرمجة الكائنية حيث التعامل مع الأهداف والمؤشرات والوراثة وماالى ذلك فيمكن بها عمل التطبيقات الهامة كالتي تعمل بالسي او الجافا

ولكن البيزك 6.0 تفقد هذه الناحية
اما بالبيزك 6.0 يمكنك عمل البرامج التي ترى ان البيزك 6.0 يمكنه انجازها بجدية و فاعلية.....على كل ما لازم نتزاعل إذا اختلفنا بالآراء.