溫馨提示×

您好，登錄后才能下訂單哦！

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

PDF中的VBS小程序怎么寫

發(fā)布時(shí)間：2021-10-12 09:25:01 來源：億速云 閱讀：128 作者：小新 欄目：開發(fā)技術(shù)

小編給大家分享一下PDF中的VBS小程序怎么寫，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！

Dim ls_File
Set objArgs = WScript.Arguments    '命令行參數(shù)

if objArgs.Count<1 then
    return
end if
ls_File = objArgs(0)    '第一個(gè)參數(shù)通常就是文件名
ls_new = left(ls_File, len(ls_File) -4 )+".pdf"

Set pptApp = CreateObject("PowerPoint.Application") '申明調(diào)用函數(shù)
pptApp.Visible = True '在使用PowerPoint時(shí),一定要有此句，否則會(huì)出錯(cuò)

Set MyPress = pptApp.Presentations.Open( ls_file) 'Presentation 對(duì)象
MyPress.Saveas ls_new,32
pptApp.Quit

以上是“PDF中的VBS小程序怎么寫”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對(duì)大家有所幫助，如果還想學(xué)習(xí)更多知識(shí)，歡迎關(guān)注億速云行業(yè)資訊頻道！

向AI問一下細(xì)節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱：is@yisu.com進(jìn)行舉報(bào)，并提供相關(guān)證據(jù)，一經(jīng)查實(shí)，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手