VB6 自作クラスにインテリセンス(入力候補)を表示するには
★ClassでPublicでEnum宣言します。
Public Enum WindowSize
DefaultSize = 0
MiniSize = 1
MaxSize = 2
End Enum
dim aaa as integer 'プロパティ値を格納しておく変数
★プロパティでEnum宣言した型を引数に指定します、
Public Property Get WindowState() As WindowSize
WindowState = aaa
End Property
Public Property Let WindowState(ByVal Param As WindowSize)
aaa = Param
End Property
★クラス呼び出し例
Dim test as new Class1
'プロパティをセット
Class1.WindowState = MaxSize
« ASP.NET2.0 BASP21を使うには | トップページ | モデリングツール DBDesigner4 »
「VB6」カテゴリの記事
- VB6 DataGirdでデータが表示されない(2010.11.05)
- VB6 コレクション(2007.08.28)
- VB6 On Error Resume Nextが動作しない(2007.06.27)
- VB6 PDF自動印刷(調査中)(2006.09.05)
- FAX送信 続き(2006.09.04)
コメント