السلام عليكم ورحمة الله وبركاته
اخواني الكرام/
لدي كود مكتوب بلغة VB6 وأقوم بتحويله إلى لغة VB.NET
وواجهني هذه السطور:
Me.ScaleMode = vbTwips Me.ScaleMode = vbPixels
وأيضا هذه الFunction وخاصة الدالة VerPtr:
Public Function HiWord(ByVal lValue As Long) As Integer CopyMem HiWord, ByVal VarPtr(lValue) + 2, 2 End Function
ونظرا لعدم معرفتي بوظيفة هها السطور فلم استطع ان احولها إلى ما يناظرها في ال VB.NET
فارجو ايفادي بذلك نظرا لان الوقت ضيق جدا بالنسبة لي وليس هناك فرصة للبحث
شكرا لكم جميعا على حسن تعاونكم