ممكــن مساعده ...

[الملكه الدلوعه]

السلام عليكم ورحمة الله وبركاته

شخباركم .؟!!

المهمــ ...

ابغي مساعده من اللي عندهم خبرات او معلومات عن الفيجوال بيسك ..

انا مسويه مشروع للمدرسع عن الرسام ... وهذا كود المشروع ..

بس شي واحد لعوزني في المشروع .. كلمه وحده انا عارفه معناتها وفايدتها بس الابله قالت لي صح بس هاتي معناتها وفايدتها ؟!! يعني اشرحيلي اياها بطريقه ثانيه ..

وانا ابغيكم تساعدوني وتقولون لي معناتها او فايدتها ..او تشرحون الكود كله ..

انا فاهمه الكود وكل شي لو مب فاهمتنه عيل كيف بسويه بس هالابله ما ادري شو فيها ...

وهذا الكود ..

Private Sub Form_Load()

DrawWidth = 6

End Sub

Private Sub form_MouseDown(button As Integer, shift As Integer, X As Single, Y As Single)

PAINTING = True

End Sub

Private Sub form_Mousemove(button As Integer, shift As Integer, X As Single, Y As Single)

If PAINTING And button = 1 Then

PSet (X, Y), vbBlue

ElseIf PAINTING And button = 2 Then

PSet (X, Y), BackColor

End If

End Sub

Private Sub form_MouseUp(button As Integer, shift As Integer, X As Single, Y As Single)

PAINTING = False

End Sub

ابغيكم تقولون لي فايدة او مهمتة هالكلمه الملونه

والسموحه

انتظر الرد