Visual Basic 命令对照表 W 到 Y

   

ABCDEFGHIJKLMNOPRSTUVWY

W  
WaitCursor System.Cursor = WdCursorType
Weekday(date) Weekday(date)
While...Wend While...Wend
num = Window() num = ActiveWindow.Index
WindowArrangeAll Windows.Arrange ArrangeStyle:=wdTiled
WindowList num Window(num).Activate
WindowName$() aCap = ActiveWindow.Caption
WindowNewWindow Windows.Add

'或

ActiveWindow.NewWindow

Window num Window(num).Activate
WindowPane() 可用 Split 属性来判断是否对某个窗口进行了拆分。

可用 Selection 对象的 StoryType 属性判断选定部分的文字部分或窗格。

WinToDOS$() x = WordBasic.[WinToDOS$](StringToTranslate)
WordLeft count

WordLeft count, select

Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdMove

Selection.MoveStart Unit:=wdWord, Count:=-1

'或

Selection.MoveLeft Unit:=WdWord, Count:=1, Extend:=wdExtend

WordRight 1

WordRight 1, 1

Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdMove

Selection.MoveEnd Unit:=wdWord, Count:=1

'或

Selection.MoveRight Unit:=WdWord, Count:=1, Extend:=wdExtend

WordUnderline, WordUnderline() Selection.Range.Underline = wdUnderlineWords

status = Selection.Range.Underline

Write Write

Y  
Year Year()