متدorientation(پرينت با استفاده ازvb)

[pa_darya]

لطفآ میشه این برنامه را واسم توضيح بدهيدerrhandlerوorientationواسه چيه؟

این هم برنامه

Private Sub Command1_Click()
Dim beginpage, endpage, numcopies, orientation, i
CommonDialog1.CancelError = True
On Error GoTo errhandler
CommonDialog1.ShowPrinter
beginpage = CommonDialog1.FromPage
endpage = CommonDialog1.ToPage
numcopies = CommonDialog1.Copies
orientation = CommonDialog1.orientation
For i = 1 To numcopies
Next
Exit Sub
errhandler:

End Sub

 

[saalek110]

با سلام.
errhandler فقط یک نام است و در :
errhandler:
شما یک لیبل ساخته اید. منظور از لیبل این است که جایگاه مقصد پرش است.
یعنی اگر برنامه شما دچار خطا شود به آنجا پرش می کند. یعنی به :
errhandler:
و چون در کد شما آنجا بعد این لیبل کدی نیست فکر کنم نتیجه این میشه که در صورت خطا کاری انجام نشود. چون به انتهای sub می رسد.

 

[pa_darya]

orientation = CommonDialog1.orientationپس اين به چه معنيه؟

 

[saalek110]

من بلد نیستم.

 

[AliHSlc]

به نام خدا
سالک عزیز...البته بی ادبیه که شاگرد پیش استاد اظهار نظر کنه..ولی فکرکنم این خصوصیت مربوط نحوه ی عمودی یا افقی بودن صفحه میشه!

 

[saalek110]

بسم رب.

من گمان کردم مربوط به پرینتر است و چون پرینتر ندارم و همچنین هیچ وقت بی تست جواب نمی دهم جواب ندادم. در فروم دیگر هم جواب شما داده شده بود. ممنون از پاسخ.

و تنها استاد و پرورش دهنده و تربیت کننده اوست.