tor
Thành viên chính thức


- Tham gia
- 4/9/14
- Bài viết
- 66
- Được thích
- 67
Mã:
Const SPACE = " "
Const DOUBLE_QUOTES = """"
'
Const STR_PDF_FOXIT_READER_PATH = "C:\Program Files\Foxit Software\Foxit Reader\Foxit Reader.exe"
Const STR_PDF_FILE_PATH = "D:\Office.Excel\[ref]\Excel Formulas and Functions 97-2013-[GPE].pdf"
Const INT_PAGE_NUMBER = 100
'
' vi du mo den trang 100
'
Sub NavigatePdfPageUsingFoxitReader()
[COLOR=#0000ff][B]Shell[/B][/COLOR] STR_PDF_FOXIT_READER_PATH + SPACE + (DOUBLE_QUOTES + STR_PDF_FILE_PATH + DOUBLE_QUOTES) + SPACE + [COLOR=#0000ff][B]"/A page="[/B][/COLOR] + CStr(INT_PAGE_NUMBER)
End Sub