Как скрыть мигающий курсор в окне ввода ComboBox? - Visual Basic .NET

Формулировка задачи:

Для TextBox всё работает:

                    Листинг программы
                
<DllImport("user32")>
    Private Shared Function HideCaret(ByVal hWnd As IntPtr) As Integer
    End Function
   Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        HideCaret(TextBox1.Handle)
    End Sub

для ComboBox (стиль DropDown) куда бы мы не вставляли HideCaret(ComboBox1.Handle) каретка не исчезает.

Решение задачи: «Как скрыть мигающий курсор в окне ввода ComboBox?»

textual
                            Листинг программы 
                        
   Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.TextChanged, ComboBox1.GotFocus, ComboBox1.Click
        Dim a As NativeWindow = TryCast(GetType(ComboBox).InvokeMember("childEdit", Reflection.BindingFlags.NonPublic Or Reflection.BindingFlags.Instance Or Reflection.BindingFlags.GetField, Nothing, Me.ComboBox1, Nothing), NativeWindow)
        HideCaret(a.Handle)
    End Sub

Оцени полезность:

7 голосов , оценка 3.857 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы