Visual Basic Equivalents D
| D | |
|---|---|
| Date$() | Date |
| DateSerial() | DateSerial |
| DateValue() | DateValue |
| Day() | Day |
| Days360() | DateDiff |
| DDEExecute channel, command | DDEExecute channel, command |
| chan = DDEInitiate (application, topic) | chan = DDEInitiate (application, topic) |
| DDEPoke channel, item, data | DDEPoke channel, item, data |
| data = DDERequest$(channel, item) | data = DDERequest (channel, item) |
| DDETerminate channel | DDETerminate channel |
| DDETerminateAll | DDETerminateAll |
| Declare | Declare |
| DefaultDir$() | x = DefaultFilePath (WdDefaultFilePath) |
| DeleteAddIn name | Addins(name).Delete |
| DeleteBackWord | Selection.Delete Unit:=wdWord, Count:=-1 |
| DeleteButton | CommandBars(name).Controls(num).Delete |
| DeleteDocumentProperty name | ActiveDocument.CustomDocumentProperties(name).Delete |
| DeleteWord | Selection.Words(1).Delete |
| DemoteList | Selection.Range.ListFormat.ListOutdent |
| DemoteToBodyList | Selection.Paragraphs(1).OutlineDemoteToBody |
| Dialog, Dialog() | Dialogs(WdWordDialog).Show |
| DialogEditor | ShowVisualBasicEditor = True |
| Dim | Dim |
| DisableAutoMacros | WordBasic.DisableAutoMacros |
| DisableInput | Application.EnableCancelKey = WdEnableCancelKey |
| DlgControlId() | WordBasic dynamic dialog functionality has been replaced by custom user forms. Refer to the topics in Microsoft Forms Help. |
| DlgEnable, DlgEnable() | |
| DlgFilePreview, DlgFilePreview$() | |
| DlgFocus, DlgFocus$() | |
| DlgListBoxArray, DlgListBoxArray() | |
| DlgLoadValues, DlgLoadValues() | |
| DlgSetPicture | |
| DlgStoreValues | |
| DlgText, DlgText$() | |
| DlgUpdateFilePreview | |
| DlgValue, DlgValue() | |
| DlgVisible, DlgVisible() | |
| DocClose | ActiveWindow.Close |
| DocMaximize, DocMaximize() | ActiveWindow.WindowState = wdWindowStateMaximize |
| DocMinimize, DocMinimize() | ActiveWindow.WindowState = wdWindowStateMinimize |
| DocMove HorizPos, VertPos | With ActiveWindow
.Top = VertPos .Left = HorizPos End With |
| DocRestore | ActiveWindow.WindowState = wdWindowStateNormal |
| DocSize width, height | With ActiveWindow
.Height = width .Width = height End With |
| DocSplit, DocSplit() | ActiveWindow.SplitVertical
= 50
x = ActiveWindow.SplitVertical |
| DocumentHasMisspellings() | x = ActiveDocument.SpellingErrors.Count |
| DocumentPropertyExists() | ' enumerate the DocumentProperties collection
For Each aProp In ActiveDocument.CustomDocumentProperties If aProp.Name = name Then itExists = True Next aProp |
| DocumentPropertyName$() | x = ActiveDocument.CustomDocumentProperties(num).Name
' or x = ActiveDocument.BuiltInDocumentProperties(num).Name |
| DocumentPropertyType() | x = ActiveDocument.CustomDocumentProperties(name).Type |
| DocumentProtection() | x = ActiveDocument.ProtectionType |
| DocumentStatistics FileName, Directory, Template, Title, Created, LastSaved, LastSavedBy, Revision, Time, Printed, Pages, Words, Characters, Paragraphs, Lines, FileSize | With ActiveDocument
var1 = .Name var2 = .Path var3 = .BuiltInDocumentProperties (wdPropertyTemplate) var4 = .BuiltInDocumentProperties(wdPropertyTitle) var5 = .BuiltInDocumentProperties(wdPropertyTimeCreated) var6 = .BuiltInDocumentProperties(wdPropertyTimeLastSaved) var7 = .BuiltInDocumentProperties(wdPropertyLastAuthor) var8 = .BuiltInDocumentProperties(wdPropertyRevision) var9 = .BuiltInDocumentProperties(wdPropertyVBATotalEdit) var10 = .BuiltInDocumentProperties(wdPropertyTimeLastPrinted) var11 = .BuiltInDocumentProperties(wdPropertyPages) var12 = .BuiltInDocumentProperties(wdPropertyWords) var13 = .BuiltInDocumentProperties(wdPropertyCharacters) var14 = .BuiltInDocumentProperties(wdPropertyParas) var15 = .BuiltInDocumentProperties(wdPropertyLines) var16 = .BuiltInDocumentProperties(wdPropertyBytes) End With |
| DocWindowHeight | ActiveWindow.Height = height |
| DocWindowPosLeft | ActiveWindow.Left = horizpos |
| DocWindowPosTop | ActiveWindow.Top = vertpos |
| DocWindowWidth | ActiveWindow.Width = width |
| DoFieldClick | Selection.Fields(1).DoClick |
| DOSToWin$() | x = WordBasic.[DOSToWin$](StringToTranslate) |
| DottedUnderline, DottedUnderline() | Selection.Font.UnderLine
= wdUnderlineDotted
x = Selection.Font.UnderLine |
| DoubleUnderline, DoubleUnderline() | Selection.Font.UnderLine
= wdUnderlineDouble
x = Selection.Font.UnderLine |
| Drawing object statements and functions | Use the properties and methods of the following objects: Shape, Shapes, and ShapeRange. |
| DropDownFormField | ActiveDocument.FormFields.Add Range:=range, Type:=wdFieldFormDropDown |
| DropListBox | ComboBox control |