Share via


Visual Basic Equivalents D

Visual Basic Equivalents D
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

aa158433(v=office.10).mdaa158435(v=office.10).mdaa158437(v=office.10).mdaa158441(v=office.10).mdaa158443(v=office.10).mdaa158446(v=office.10).mdaa158448(v=office.10).mdaa158450(v=office.10).mdaa158452(v=office.10).mdaa158452(v=office.10).mdaa158452(v=office.10).mdaa158454(v=office.10).mdaa158456(v=office.10).mdaa158458(v=office.10).mdaa158458(v=office.10).mdaa158460(v=office.10).mdaa158462(v=office.10).mdaa158464(v=office.10).mdaa158466(v=office.10).mdaa158466(v=office.10).mdaa158468(v=office.10).mdaa158468(v=office.10).md

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