Office VBA教程:DataSource属性

返回或设置一个 String 类型,表示附加的数据源的名称。可读写。

expression.DataSource

expression   必需。该表达式返回“应用于”列表中的对象之一。

VBA示例

如果数据源的名称为空,本示例设置其名称。


Sub SetAndReturnDataSourceName()
    Dim appOffice As OfficeDataSourceObject
    Set appOffice = Application.OfficeDataSourceObject
    With appOffice
        .Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _
            "UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees"
        If .DataSource = "" Then
            .DataSource = "Northwind"
            MsgBox .DataSource
        End If
    End With
End Sub

上页:Office VBA教程:Creator属性 下页:Office VBA教程:Description属性

Office VBA教程:DataSource属性

Office VBA教程:Description属性 Office VBA教程:DescriptionText属性
Office VBA教程:DialogType属性 Office VBA教程:DisableAskAQuestionDropdown属性
Office VBA教程:DisableCustomize属性 Office VBA教程:DisplayFonts属性
Office VBA教程:DisplayKeysInTooltips属性 Office VBA教程:DisplayTooltips属性
Office VBA教程:DropDownLines属性 Office VBA教程:DropDownWidth属性
Office VBA教程:Enabled属性 Office VBA教程:ExpireDate属性
Office VBA教程:Extended属性 Office VBA教程:Extensions属性
Office VBA教程:FaceId属性 Office VBA教程:FeatureTips属性
Office VBA教程:FileName属性 Office VBA教程:Files属性
Office VBA教程:FileType属性 Office VBA教程:FileTypes属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号