VB ActiveX コントロール インターフェイス ウィザードから
ユーザコントロールを作ると、

例えばText1のAlignmentを参照すると
Public Property Get Alignment() As Intger
  Alignment = Text1.Alignment
End Property

Public Property Let Alignment(ByVal New_Alignment As Intger)
  Text1.Alignment() = New_Alignment
  PropertyChanged "Alignment"
End Property
となるのですが、これだとプロパティウインドウで見ると数字だけです。

As IntgerのところをAs AlignConstantsとすると、
0-vbLeftJustify
1-vbRightJustify
2-vbCenter
と選択できるようになるのですが、これを
0-左揃え
1-右揃え
2-中央揃え
とTextBoxと同じかたちにするにはどうすればよいのでしょうか。
他にもAppearanceやBorderStyleなども揃えたいです。
どこかに一覧などありませんでしょうか。

自分で Enum を日本語で作れば表示は出来ます。
> どこかに一覧などありませんでしょうか。
分かりませんが、あったとして、コード上で使えるのであれば
オブジェクトブラウザで見える形になってますよね？普通は…。
実際にはそんなの見たこと無いので、素人考えですが、使える
形ではないのではないかと。

> と選択できるようになるのですが、これを
> 0-左揃え
> 1-右揃え
> 2-中央揃え
> とTextBoxと同じかたちにするにはどうすればよいのでしょうか。

http://www.users.gr.jp/ml/archive/viewer.aspx?name=com&no=230

上記のようにして、IPerPropertyBrowsing.GetDisplayString を実装すれば
一応は可能ですが、それなりの手間が必要ですよ。(^_^;)

# VB6での実装サンプルは、確か Steve McMahon 氏が公開しておられたような。

魔界の仮面弁士さんのリンク先覗いてみましたが、
理解できませんでした。
Asと入力したあとに表示されるリスト
（何しろものすごい数なので全部は試せませんでした）
の中にひょっとしたらあるのかと思ったのですが、
ユーザが直接触るところでもないので、難しそうならやめておきます。
ありがとうございました。