0 голосов
спросил от в категории VBNET
На самом деле элементы ComboBox с стилем DropDownList являются ReadOnly (не изменяются пользователем). Убедитесь, что DrawMode установлен в Normal, иначе измените его, если вы хотите настроить ComboBox. Вот настраиваемый ComboBox, который я написал некоторое время назад.

Option Strict On Public Class Super_ComboBox : Inherits System.Windows.Forms.ComboBox     Public Sub New()         ' Me.DoubleBuffered = True         ' Me.ResizeRedraw = True         With _ButtonArea             .X = Me.ClientRectangle.X - 1             .Y = Me.ClientRectangle.Y - 1             .Width = Me.ClientRectangle.Width + 2             .Height = Me.ClientRectangle.Height + 2         End With     End Sub #Region "FIELDS"     Private _ItemsForeColor As New Pen(Color.Black)     Private _borderColor As New Pen(Me.BackColor)     Private _pickerColor As New Pen(Color.Green)     Private _displayTextProperty As Boolean = False     Private _displayText As String     Private _ItemsBackColor As SolidBrush = New SolidBrush(Color.FromKnownColor(KnownColor.ControlLight))     Private _ItemsFont As Font = New Font("Calibri Light", 10, FontStyle.Regular)     Private _DropDownSign As Boolean = True #End Region  #Region "PROPERTIES"     ''' <summary>     ''' Gets or Sets the Forecolor of the dropdown items.     ''' </summary>     ''' <returns></returns>     Public Property ItemsForeColor As Color         Get             Return _ItemsForeColor.Color         End Get         Set(value As Color)             _ItemsForeColor.Color = value             Me.Invalidate()         End Set     End Property     ''' <summary>     '''Gets or Sets the Bordercolor of the Combobox.     ''' </summary>     ''' <returns></returns>     Public Property BorderColor As Color         Get             Return _borderColor.Color         End Get         Set(value As Color)             _borderColor.Color = value             Me.Invalidate()         End Set     End Property     ''' <summary>     ''' Gets or Sets the Backcolor of a selected dropdown item.     ''' </summary>     ''' <returns></returns>     Public Property PickerColor As Color         Get             Return _pickerColor.Color         End Get         Set(value As Color)             _pickerColor.Color = value             Me.Invalidate()         End Set     End Property     Public Property DisplayTextProperty As Boolean         Get             Return _displayTextProperty         End Get         Set(value As Boolean)             _displayTextProperty = value             Me.Refresh()         End Set     End Property     Public Property DisplayText As String         Get             Return _displayText         End Get         Set(value As String)             _displayText = value             Me.Invalidate()         End Set     End Property     Public Property ItemsBackColor As Color         Get             Return _ItemsBackColor.Color         End Get         Set(value As Color)             _ItemsBackColor.Color = value         End Set     End Property     ''' <span

Ваш ответ

Отображаемое имя (по желанию):
Конфиденциальность: Ваш электронный адрес будет использоваться только для отправки уведомлений.

Категории

Добро пожаловать на сайт DraftingCode Q&A (ИТ ответы), где вы можете задавать вопросы и получать ответы от других членов сообщества.

Связанных вопросов не найдено

...