選択されている ActiveX 参照のロケールを取得します。
名前空間 : Microsoft.VisualStudio.VCProjectEngine
アセンブリ : Microsoft.VisualStudio.VCProjectEngine (Microsoft.VisualStudio.VCProjectEngine.dll 内)
構文
'宣言
ReadOnly Property ControlLocale As Integer
'使用
Dim instance As VCActiveXReference
Dim value As Integer
value = instance.ControlLocale
int ControlLocale { get; }
property int ControlLocale {
int get ();
}
function get ControlLocale () : int
プロパティ値
型 : System.Int32
選択されている ActiveX 参照のロケール値を、プログラミング言語に応じて int 型または long 型で返します。
解説
このサンプル コードをコンパイルして実行する方法については、「方法 : Visual C++ コード モデル機能拡張のプログラム例をコンパイルする」を参照してください。
例
[Visual Basic]
ソリューションの各プロジェクトについてループを実行し、各 ActiveX (COM) コントロールのロケール ID を表示します。
' Add a reference to Microsoft.VisualStudio.VCProjectEngine and have a
' Visual C++ project loaded before running this example. Also, you
' should have at least one ActiveX (COM) reference in a project.
Imports EnvDTE
Imports Microsoft.VisualStudio.VCProjectEngine
Public Module Module1
Sub Test()
Dim proj As Project
Dim vcproj As VCProject
Dim ref As VCReference
Dim axref As VCActiveXReference
On Error Resume Next
' Loop each project in the solution.
For Each proj In DTE.Solution.Projects
vcproj = Nothing
vcproj = CType(proj.Object, VCProject)
' If this project is a Visual C++ project.
If Not vcproj Is Nothing Then
' Loop the references for this Visual C++ project.
For Each ref In vcproj.VCReferences
axref = Nothing
axref = CType(ref, VCActiveXReference)
' If this reference is an ActiveX reference.
If Not axref Is Nothing Then
MsgBox("Control locale: " & axref.ControlLocale)
End If
Next
End If
Next
End Sub
End Module
アクセス許可
- 直前の呼び出し元に対する完全な信頼。このメンバは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。