display pdf in asp net c# : Rotate pdf pages software SDK dll winforms wpf .net web forms 1200%20macro_examples47-part166

471
End If
End Sub
If the user needs to do multiple prints from the dialog, then set it up with a loop.
Sub ExcelExampleWithLoop()
Do
UserForm1.Show
If buttonNumber = 1 Then
'code to show dialog or to print
ElseIf buttonNumber = 2 Then
'code to show a different dialog or to print
End If
Loop
End Sub
28.13 Keeping An Error Handling In Effect After An
Error Occurs
An error handler must end with aResume statement for that error handler to remain in effect:
Sub MySub()
Dim N As Integer, I As Integer
On Error GoTo ErrHandler
Do
'count the loops so that the Loop Until will halt when 10 loops are done
I = I + 1
'create an intentional error
N = 1 / 0
DoNext:
Loop Until I = 10
Exit Sub
ErrHandler:
'Error handling code
'return to the loop, resetting the error handler
Resume DoNext
End Sub
Rotate pdf pages - rotate PDF page permanently in C#.net, ASP.NET, MVC, Ajax, WinForms, WPF
Empower Users to Change the Rotation Angle of PDF File Page Using C#
pdf rotate single page reader; rotate pdf pages
Rotate pdf pages - VB.NET PDF Page Rotate Library: rotate PDF page permanently in vb.net, ASP.NET, MVC, Ajax, WinForms, WPF
PDF Document Page Rotation in Visual Basic .NET Class Application
pdf reverse page order preview; rotate single page in pdf file
472
If you replace theResume DoNext withGoTo DoNext, the above will crash the second time
through, as the error handler has not been reset.
28.14 Excel Crashes When A UserForm Is Displayed
Some users have experienced problems with Excel crashing with the dreaded "this program has
performed an illegal operation" when a  user form is displayed.  Typically, this is a form that has
gone through a re
-
sizing.  There are two possible cures (neither guaranteed)
Delete the Form and re
-
create it
OR
1) Save (export) the form
2) Delete the form
3) Retrieve the form
28.15 Error Handling And Getting the Error Line
If you number your lines, you can get the line of code with the error variable "erl". For example:
Sub Example()
1  a=5
2
On Error GoTo ErrorHdl
3  b=6
4
MsgBox 5/0 '<==error here
Exit Sub
ErrorHdl:
MsgBox erl '<==this will show a 4.
End Sub
Note that the #s are NOT labels (no ":"), but line #s. You can number just the lines which
MIGHT cause an error.
28.16 ErrObject
The easiest way to access theErrObject is through the globalErr() method.  It was set up this
way for backwards computability with previous versions of VBA.  TheErr() method returns an
ErrObject, so all you have to do to use it is to use statements like:
Err.Description
Err.LastDLLError
VB.NET PDF Page Delete Library: remove PDF pages in vb.net, ASP.
Page: Delete Existing PDF Pages. |. Home ›› XDoc.PDF ›› VB.NET PDF: Delete PDF Page. How to VB.NET: Delete Consecutive Pages from PDF.
rotate pdf pages in reader; how to rotate pdf pages and save
C# PDF Page Delete Library: remove PDF pages in C#.net, ASP.NET
Page: Delete Existing PDF Pages. Provide C# Users with Mature .NET PDF Document Manipulating Library for Deleting PDF Pages in C#.
rotate individual pages in pdf reader; save pdf rotate pages
473
29. DIALOGSHEETS
29.1 How To Create And Display Dialogsheets
In Excel 97/2000, dialogsheets have been replaced with userforms.  However, you can still create
dialogsheets in Excel 97/2000. The main advantage of a dialog sheet is using a editbox to
return a range from any worksheet in any workbook.
From a worksheet, right click on the worksheet tab and select Insert and then MS Excel 5 Dialog.
To display a dialog created on a dialogsheet, use statements like the following:
Dim bResponse As Boolean
bResponse = ThisWorkbook.DialogSheets("Dialog1").Show
If bResponse = False Then Exit Sub
or
If Not ThisWorkbook.DialogSheets("Dialog1").Show Then _
Exit Sub
B
oth examples useThisWorkbook to qualify the dialogsheet.  If you do not qualify the
dialogsheet, and the active workbook is not the workbook containing the dialogsheet, your code
will crash.
29.2 Selecting A Range Using An Excel 5/7 Dialog Sheet
The first step in this process is to create a new dialog sheet.  If you are using Excel 5/7 you can
do this by selecting Insert, Macro, Dialog.  A new dialog sheet will appear with an OK and
Cancel button.  To create a dialog sheet In Excel 97/2000, right click on a worksheet tab in Excel
and select Insert and then pick the Excel 5.0 Dialog option.  Name the dialog sheet "Range Dlg"
so that it works with the code below.
When the dialog sheet appears, the Forms toolbar should also appear.  If it does not, then select
View, Toolbars and activate the Forms toolbar.
On the Forms toolbar, click on the edit box button and draw an edit box on the dialog box.  Next,
with the edit box selected, click on the control properties button and change the edit validation
option to reference.  This allows you to pick a range on a worksheet.
To set the tab order so that the edit box is the active control when the dialog is displayed, right
click in a blank area of the dialog sheet.  This will display a pop
-
up menu with an option named
"Tab Order".  Select this option and move the edit box control to the top of the tab order.
Now put the following code on a module.
VB.NET PDF Page Insert Library: insert pages into PDF file in vb.
Page: Insert PDF Pages. |. Home ›› XDoc.PDF ›› VB.NET PDF: Insert PDF Page. Add and Insert Multiple PDF Pages to PDF Document Using VB.
pdf save rotated pages; reverse pdf page order online
C# PDF Page Insert Library: insert pages into PDF file in C#.net
how to merge PDF document files by C# code, how to rotate PDF document page, how to delete PDF page using C# .NET, how to reorganize PDF document pages and how
save pdf rotated pages; pdf rotate single page reader
474
Sub Get_A_Range()
Dim rangeSelected As Range
With ThisWorkbook.DialogSheets("Range Dlg")
'clear the edit box
.EditBoxes(1).Text = ""
'display the dialog and exit if cancel selected
If Not .Show Then Exit Sub
'Exit if no range supplied
If .EditBoxes(1).Text = "" Then
MsgBox "No range selected"
Exit Sub
End If
'assign the range selected to a range variable
Set rangeSelected = Range(.EditBoxes(1).Text)
End With
'code that uses the selected range
End Sub
The above code will display the dialog sheet, exit if cancel is selected or assign the selected range
to a variable if one is selected.  Since there is only one edit box on this particular dialog, the use
of EditBoxes(1) is the easy way to refer to the edit box.  It could also be referred to by its name
and identified using an object variable.  The following illustrates this approach along with several
other techniques:
Sub Get_A_Range()
Dim rangeSelected As Range
Dim dlg As DialogSheet
Dim eBox As EditBox
Set dlg = ThisWorkbook.DialogSheets("Range Dlg")
Set eBox = dlg.EditBoxes("edit box 1")
'clear the edit box
eBox.Text = ""
'display the dialog and exit if cancel selected
If Not dlg.Show Then Exit Sub
If .EditBoxes(1).Text = "" Then
MsgBox "No range selected"
Exit Sub
End If
C# PDF Page Extract Library: copy, paste, cut PDF pages in C#.net
C#.NET PDF Library - Copy and Paste PDF Pages in C#.NET. Easy to C#.NET Sample Code: Copy and Paste PDF Pages Using C#.NET. C# programming
rotate pdf page few degrees; pdf page order reverse
VB.NET PDF Page Replace Library: replace PDF pages in C#.net, ASP.
C#.NET convert PDF to text, C#.NET convert PDF to images, C#.NET PDF file & pages edit, C#.NET PDF pages extract, copy, paste, C#.NET rotate PDF pages, C#.NET
rotate single page in pdf; how to rotate a single page in a pdf document
475
'assign the range selected to a range variable
Set rangeSelected = Range(eBox.Text)
'code that uses the selected range
End Sub
29.3 Changing The Name Of Your Dialogsheet Objects
You can put text labels, edit boxes, list boxes, and many other objects on a dialog sheet.  These
objects are assigned names like "edit box 1", edit box 2", "list box 1", and so forth.  If you want to
assign these objects names that are more descriptive and make it easier for you to identify them in
your code do the following:
Click on the object you wish to rename to select it
Then click on the Name Box (upper left corner of the screen) and type the new
name.  PRESS ENTER.  If you don't press Enter, the name won't stick.
You can now refer to the object by its new name in your code.  For example, if you renamed
"edit box 1" to "Last Name", then the following code (located in the same workbook as the dialog
sheet) would refer to this box, and assign its value to a variable named "lastName"
lastName = ThisWorkbook.DialogSheets("My Dialog") _
.EditBoxes("Last Name").Text
By usingThisWorkbook to qualify the dialog sheet, you insure that Excel knows to look in the
workbook containing the code for the dialog sheet, as opposed to looking into the active
workbook, which may not be the same workbook.  This is very important when you are creating
add
-
ins.
29.4 Setting The Tab Order In A DialogSheet
The tab order of a dialogsheet is the order in which one moves from object to object when the
dialog or userform is displayed.  Also, in Excel 5/7 it is the order in which controls or object of
the same type (such as text boxes, buttons, etc.) are referenced by their index numbers.  If you
change the tab order, the names of the objects no longer indicate the index or tab order.
To change the tab order:
Make sure no controls are selected.
Right
-
click in the dialog, but not on a control.
From the shortcut menu, choose Tab Order.
C# PDF Page Replace Library: replace PDF pages in C#.net, ASP.NET
Page: Replace PDF Pages. |. Home ›› XDoc.PDF ›› C# PDF: Replace PDF Pages. C#.NET PDF Library - Replace PDF Pages in C#.NET.
reverse page order pdf; how to permanently rotate pdf pages
VB.NET PDF - WPF PDF Viewer for VB.NET Program
C#.NET convert PDF to text, C#.NET convert PDF to images, C#.NET PDF file & pages edit, C#.NET PDF pages extract, copy, paste, C#.NET rotate PDF pages, C#.NET
rotate pages in pdf permanently; rotate all pages in pdf
476
Select the name of a control you want to reposition in the tab order.
Choose Move Up or Move Down until the control name is in the appropriate
position in the tab order.
29.5 Displaying Dialogsheets
To display a dialogsheet, use theShow method.  If a cancel button is selected, then theShow
method returnsFalse.  If an OK button or a button whose dismiss property is set on is selected,
theShow method returnsTrue To check the setting of a button's properties, select the button
and then click on the control properties button of the Visual Basic toolbar.
The following illustrate statements that display dialogs:
If the dialog is in the active workbook, this will work
DialogSheets("Dialog1").Show
If the active workbook is not the one containing the dialog sheet, then use a statement like this:
ThisWorkbook.DialogSheets("Dialog1").Show
Use of theThisWorkbook qualifier is highly recommended
To determine if theShow method returnsTrue orFalse, you need to use statements like the
following:
Dim bResponse As Boolean
bResponse = ThisWorkbook.DialogSheets("Dialog1").Show
If bResponse Then
'actions to take if cancel button not selected
End If
The following is a simpler construction that stops the code if a cancel button is selected:
If Not ThisWorkbook.DialogSheets("Dialog1").Show Then End
or
If Not ThisWorkbook.DialogSheets("Dialog1").Show Then Exit Sub
The difference in the above two examples is the use ofEnd versusExit Sub.  TheEnd statement
halts all macro activity and resets any global variables.  The Exit Sub statement stops the current
macro, but allows any calling routine to continue.
If the macro is a subroutine in another routine, then you should set aPublic variable or a shared
variable so that the calling routine can determine what occurred in the sub
-
routine.
477
Public variable approach:
'at the top of a module declare the following variable
Public bResponse As Boolean
Sub Main_Routine()
'call routine that displays the dialog
Display_Dialog
If Not bResponse Then Exit Sub
'code for whatever….
End Sub
Sub Display_Dialog()
If Not ThisWorkbook.DialogSheets("Dialog1").Show Then
bResponse = False
Exit Sub
End If
bResponse = True
'code for whatever…..
End Sub
Shared variable approach
Sub Main_Routine()
Dim bResponse As Boolean
'call routine that displays the dialog
Display_Dialog bResponse
If Not bResponse Then Exit Sub
'code for whatever….
End Sub
Sub Display_Dialog(bResponse As Boolean)
If Not ThisWorkbook.DialogSheets("Dialog1").Show Then
bResponse = False
Exit Sub
End If
bResponse = True
'code for whatever…..
End Sub
478
In the second example, if a variable is used to pass a value to a called routine, then the called
routine can change the value stored in the variable.  This allows the called routine to pass
information back to the calling routine without using Public variables or module level variables.
In the above, the same name was used for the variable in both routines.  This was a matter of
convenience.  Different names could have been used.
479
30. CONTROLLING USER
INTERRUPTIONS
30.1 Capturing When Esc Or Ctrl
-
Break Are Pressed
If you use the following statement:
Application.EnableCancelKey=xlDisabled
The Esc key is completely disabled, and your macros will ignore the Esc key.
If you use:
Application.EnableCancelKey=xlInterrupt:
This allows the Esc key to stop a running macro (the default state)
If you use
Application.EnableCancelKey=xlErrorHandler:
The interrupt is sent to the running procedure as an error, trappable by an error handling
statement set with anOn Error GoTostatement.  The trappable error code number is 18.
If theApplication propertyEnableCancelKey is set toxlErrorHander, then control is
transferred to the current error handling routine that is set by anOn Error GoTostatement.  The
following illustrates this:
Sub CaptureKeyBoardInterruptExample()
Dim X
'Set the error handler
On Error GoTo ReActToEvent
'set the EnableCancelKey property
Application.EnableCancelKey = xlErrorHandler
'run a loop that won't stop until either esc or ctrl
-
break is pressed.
While 1 = 1
X = X
Wend
Exit Sub
480
'control comes to this routine when either esc or ctrl
-
break is pressed
ReActToEvent:
MsgBox "Break Key Hit"
'turn back on the interrupt property
Application.EnableCancelKey = xlInterrupt
End Sub
You can set theEnableCancelKey  property toxlErrorHandler and it stays in effect for all
subroutines, with control being transferred to whatever label that On Error GoTo is set to for
error handling.
Setting theEnableCancelKey  property back toxlInterrupt allows the Esc key or the Ctrl
-
Break
key combination to interrupt your code and display a debug dialog box.
If you want your code to handle the user pressing the ESC key while the code is running, then
put the following code in your routines
Application.EnableCancelKey = xlErrorHandler
On Error GoTo HandleError
'your code
Exit Sub
HandleError:
'code to run if ESC pressed
End Sub
Several important points about the above
HandleError can be any label name you want (other than words that Visual
Basic recognizes).
The last error handler set is the one used to handle the ESC key 
-
if it is in the
routine running when ESC is pressed, or if it is in a higher routine that calls
the running routine
Setting OnError GoTo 0 in a called routine does not clear the error handler
that handles the ESC key 
-
instead, it goes to the last set error handler from a
higher routine
Setting OnError GoTo 0 in the same routine that setsEnableCancelKey will
cause the ESC key not to be handled.
Because of the various combinations you can run into with error trapping, you should test your
handling of the ESC key to insure that it does handle the different situations.
Documents you may be interested
Documents you may be interested