我怎样才能实现用代码来定义combo的style属性

Question

Private Sub Form_Load()
Combo1.Style = 1
End Sub报错
不能给只读属性赋值我怎样才能实现用代码来定义combo的style属性

Answer 1

对于 ComboBox 控件， Style 属性值为：常数 值 描述 
VbComboDropDown 0 （缺省值）下拉式组合框。包括一个下拉式列表和一个文本框。可以从列表选择或在文本框中输入。 
VbComboSimple   1 简单组合框。包括一个文本框和一个不能下拉的列表。可以从列表中选择或在文本框中输入。简单 组合框的大小包括编辑和列表部分。按缺省规定，简单组合框的大小调整在没有任何列表显示的状态。增加 Height 属性值可显示列表的更多部分。 
VbComboDrop-DownList 2 下拉式列表。这种样式仅允许从下拉式列表中选择。 注意：在程序运行时不可以设置该属性