Vb求代碼文本輸入單詞

入口參數；Insert_String是要插入的字符。

功能；在Word文檔中插入字符的功能:關閉文檔會出錯；否則，可以連續插入字符。

布爾型公共函數Insert String(ByVal Insert _ String As String)

出錯時轉到出錯

obj應用。selection . TypeText Text:= Insert _ String

obj應用。' Visible = True '使程序可見。

InsertString = True

退出功能

壹個錯誤:

如果錯誤。號碼& lt& gt那麽0

選擇案例錯誤。數字

其他情況

MsgBox "錯誤代碼:" &；呃。數量和數量。"錯誤描述:" &；呃。描述

InsertString = False

結束選擇

如果…就會結束

結束功能

插入前需要建立Word文檔對象。