デフォルト参照設定について

解決

VB初心者 2006-01-23 17:47:43 No: 129778

ＶＢ初心者です。
現在VB6.0でDLLを作成しています。

根本的な質問なのですがデフォルト参照設定で
下記がチェックされています。

"Visual Basic runtime objects and procedures"
"Visual Basic objects and procedures"
"Visual Basic For Applications"
"OLE Automation"
これはそれぞれ何を意味しているのでしょうか。

ご指導お願いします。

魔界の仮面弁士 2006-01-23 18:39:42 No: 129779

> "Visual Basic runtime objects and procedures"
VB 組み込みの定数などを定義しているライブラリです。

そのほか、VBランタイムが、プロシージャ引数などとして利用するクラス
(AsyncProperty, DataObject, EventParameters など)も
この中で定義されています。

> "Visual Basic objects and procedures"
VB6 の標準コントロール(≠ActiveXコントロール)が定義されています。

また、VB6 固有のシングルトンクラスの管理も行われています。
  Dim g As VBGlobal
  Set g = [Global]    '←これは無くてもよいけど
  MsgBox g.App.EXEName

> "Visual Basic For Applications"
VB6 と Office VBA などと間で、共通する言語部品が定義されています。
(実際には、完全に同じというわけではありませんが)

Mid関数や CLng関数といった各種関数や、一部のステートメント、
それにエラーオブジェクトやCollectionオブジェクトが定義されています。

> "OLE Automation"
FontオブジェクトやPictureオブジェクト、あるいは
OLE_COLOR や OLE_TRISTATE といった型を管理しています。

これは必須項目ではありませんので、チェックを外す事も可能ですが、
外した場合には、たとえば下記のコードなどは使えなくなります。

Option Explicit
Private WithEvents f As StdFont
Private Sub Form_Load()
    Set f = Text1.Font
End Sub
Private Sub f_FontChanged(ByVal PropertyName As String)
    MsgBox PropertyName & "が変更されました"
End Sub
Private Sub Command1_Click()
   f.Size = 15
End Sub
Private Sub Command2_Click()
    f.Name = "ＭＳ明朝"
End Sub

VB初心者 2006-01-23 18:43:18 No: 129780

魔界の仮面弁士さん。
迅速且つ詳細な説明、本当にありがとうございます！！
なぞが解けすっきりしました。
今後もご指導お願い致します。