PDA

نسخه کامل مشاهده نسخه کامل : مشکل کد زیر چیست؟


M-B-M
28-09-2007, 10:47
Public Declare Function Escape Lib "gdi32" (ByVal hdc As Long, ByVal nEscape As Long, ByVal nCount As Long, ByVal lpInData As String, lpOutData As Any) As Long

Sub Command1_Click()
Const PORTRAIT = 1
Const LANDSCAPE = 2
Const GETSETPAPERORIENT = 30
Dim Orient As OrientStructure ***
Printer.Print ""
Orient.Orientation = LANDSCAPE
x% = Escape(Printer.hdc, GETSETPAPERORIENT, Len(Orient), "", Null)
Print x%
End Sub

دوستان عزیز این کد برای پرینت گرفتن فرم بصورت عمودی می باشد اما از خطی که سه ستاره (***)دارد خطا می گیرد لطفا مرا راهنمایی فرمایید
SuB
28-09-2007, 16:39
Public Declare Function Escape Lib "gdi32" (ByVal hdc As Long, ByVal nEscape As Long, ByVal nCount As Long, ByVal lpInData As String, lpOutData As Any) As Long

Sub Command1_Click()
Const PORTRAIT = 1
Const LANDSCAPE = 2
Const GETSETPAPERORIENT = 30
Dim Orient As OrientStructure ***
Printer.Print ""
Orient.Orientation = LANDSCAPE
x% = Escape(Printer.hdc, GETSETPAPERORIENT, Len(Orient), "", Null)
Print x%
End Sub

دوستان عزیز این کد برای پرینت گرفتن فرم بصورت عمودی می باشد اما از خطی که سه ستاره (***)دارد خطا می گیرد لطفا مرا راهنمایی فرمایید

شما باید نوع OrientStructure رو اول تعریف کنید.
M-B-M
30-09-2007, 21:13
شما باید نوع OrientStructure رو اول تعریف کنید.


لطفا بیشتر توضیح دهید.
SuB
30-09-2007, 21:38
لطفا بیشتر توضیح دهید.

توی VB یک سری از نوع ها هستند که قبلاً تعریف شده اند مثل integer و long و string و ...

اما بغضی نوعها هستند که همین جوری توی وی بی تعریف نشده اند. مثل همین OrientStructure . چون این نوع ها مخصوص توابع خاصی هستند و ربطی به پایه وی بی ندارند، به طور پیشفرض تعریف نشده اند. این نوع ها بیشتر توی توابع API استفاده میشند.

در مورد طرز تعریف OrientStructure باید به جایی مراجعه کنید که توش در مورد کدهایی که توی برنامه تون استفاده کردید، نوشته باشه.
M-B-M
02-10-2007, 23:37
توی VB یک سری از نوع ها هستند که قبلاً تعریف شده اند مثل integer و long و string و ...

اما بغضی نوعها هستند که همین جوری توی وی بی تعریف نشده اند. مثل همین OrientStructure . چون این نوع ها مخصوص توابع خاصی هستند و ربطی به پایه وی بی ندارند، به طور پیشفرض تعریف نشده اند. این نوع ها بیشتر توی توابع API استفاده میشند.

در مورد طرز تعریف OrientStructure باید به جایی مراجعه کنید که توش در مورد کدهایی که توی برنامه تون استفاده کردید، نوشته باشه.



دوست عزیز از لطف شما ممنون هستم اما مشکل من حل نشد!
SuB
03-10-2007, 16:21
دوست عزیز از لطف شما ممنون هستم اما مشکل من حل نشد!

OrientStructure رو از خودت تعریف کردی؟
msn2007
15-10-2007, 17:20
چه خطایی می ده