vb.net 中的COMBOBOX控件 除了用ENABLE 外还有什么方法可以设置为只读

[haitor]

vb.net 中的COMBOBOX 和 DateTimePicker 控件，除了用ENABLE 外还有什么方法可以设置为只读。
要求设置只读后外观和没设相同

请各路高人指点迷津啊

[minajo21]

不知道你要什么效果，ENABLE 不是满族你了？还有别的干嘛？


如果是COMBOBOX不让输入只让选，可以 .DropDownStytal = DropDownList

[chinahth]

我也觉得设DropDownStytal属性为 DropDownList

[xDotNet]

设置为 COMBOBOX.DropDownStytal = DropDownList
这样只可以下拉～ 算是只读了～

[accpzj]

是不是象TEXTBOX.readonly一样
关注

[zhpsam109]

up！

[banni2003]

设置为COMBOBOX.DropDownStytal = DropDownList
在combobox属性里也可以改为DropDownList

[haitor]

也不能下拉,

因为用ENABLE设置后框内的文本颜色会反白，而背景色也变为灰色，整个文本变的不清晰，这样会使用户看框内的文本很吃力；我要的效果就是不能让COMBOBOX中和DateTimePicker的内容不能更改，并且框内的文本要清淅。

[haitor]

也不能下拉,

因为用ENABLE设置后框内的文本颜色会反白，而背景色也变为灰色，整个文本变的不清晰，这样会使用户看框内的文本很吃力；我要的效果就是要让COMBOBOX中和DateTimePicker的内容不能更改，并且框内的文本要清淅。

[HZCNC]

那就不要用COMBOBOX呢？
如果你只要要内容不能变，用Label不是也行。

[haitor]

也有需要变的时间，在做修改时要，如果修改用COMBOBOX,显示用LABEL，也是可以就是麻烦些，我不想用这种方式。

[99441dudu]

答：可以重畫一下就可以了：以下是一個類似要求的TextBox控件代碼，你把她拷貝到一個新建立的WindowForm下，拉工具欄目的TextBox控件入WindowForm，改寫引用為"
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.TextBox1 = New MyTextBox "
測試一下：把TextBox的控件的Enable=false,看看效果，應該是你要的!
祝好運！

'-----Class----'
Public Class MyTextBox
Inherits TextBox

Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
Dim drawBrush As SolidBrush = New SolidBrush(ForeColor.Red)

e.Graphics.DrawString(Text, Font, drawBrush, 0.0F, 0.0F)
End Sub

Public Sub New()
MyBase.New()

'Me.SetStyle(ControlStyles.UserPaint, True)
Me.SetStyle(ControlStyles.UserPaint, True)
End Sub
End Class

[xDotNet]

Private Sub ComboBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboBox1.KeyPress
if <条件> then
e.Handled = True
endif
End Sub

[vickyyu]

up!

Me.ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList

[wolftop]

Visible属性!

[haitor]

谢谢各位