توضیح در مورد این کد

[ma.andishe]

سلام
میدونم شاید جاش نباشه در این جا در مورد vb6 توضیح بخوام ولی از اونجا که اکثر دوستان عزیز معمولا اول vb6 کار بودند بعد با .net کار کردند خواست 1 توضیح مختصر در مورد این کد بدند مثلا توی خط 5 چه چیزی از گرید توی متغییر r ریخته میشه و یا توی خط 8 متد move از فرم 1 ,و یا متد left از فرم 2 .......نهایت تشکر از همکاری عزیزان


*********************************************
Private Sub grid_1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
Dim r As Integer
Dim c As Integer
r = GetRowClicked(grid_1, y)
c = GetColClicked(grid_1, x)
If Button = vbRightButton And r <> -1 Then
grid_1.RowSel r
form_1.Move form_2.Left + grid_1.Left + x, form_2.Top + Holder2.Top + grid_1.Top + y
form_1.Show 1
End If
End Sub

[Mani_rf]

کاش پروژه را میگذاشتی ، اینجوری یکم سخته...
تو خط 4 و 5 احتمالا GetRowClicked و GetColClicked دوتا تابع هستند که باید ببینی تو اونها چی نوشته و چی برمیگردونند.

r = GetRowClicked(grid_1, y)
c = GetColClicked(grid_1, x)

این خط :
form_1.Move form_2.Left + grid_1.Left + x, form_2.Top + Holder2.Top + grid_1.Top + y
و توابع Move و خواص Left ,... کار خیلی خواصی انجام نمی دهند، فقط به نسبت مختصات فعلی فرم و یک سری محاسبات محل قرار گیری فرم را روی صفحه تغییر میدن.

[محسن شامحمدی]

r = GetRowClicked(grid_1, y)

این خط احتمالا متوجه می شه که فوکوس الان روی کدوم row هستش و شماره سطر رو می ریزه توی R