combo control 2 missings elements

This code work fine with standard combobox but not with codejock combobox

 

        If Not Screen.ActiveControl Is Nothing Then
            sTemp = TypeName(Screen.ActiveForm.ActiveControl)
            Select Case sTemp
            Case "TextBox", "ComboBox", "RichTextBox"
                Screen.ActiveControl.SelText = Clipboard.GetText
            Case "ReportControl"
                Screen.ActiveControl.Paste
            Case Else
                Debug.Print sTemp
            End Select
        End If

 

also this code work fine with standard vb combobox but don't with codejock combobox

 

Private Sub cmbDateStart_DropDown()
    If IsDate(cmbDateStart.Text) Then DatePicker1.EnsureVisible cmbDateStart.Text
    'here before we place the dropdown section check the place on the screen
    DatePicker1.Left = cmbDateStart.Left + 160
    DatePicker1.Top = cmbDateStart.Top + cmbDateStart.Height + 20
    bDatePickerSelectionChanged = False
    DatePicker1.ShowModal 1, 1
    If DatePicker1.Selection.BlocksCount = 1 Then
        cmbDateStart.Text = Format$(DatePicker1.Selection.Blocks(0).DateBegin, sShortDate)
    Else
        If bDatePickerSelectionChanged Then
            cmbDateStart.Text = LoadExtString(1254, AppPath & CurrentLang.ResID & "\Language.dll")
        End If
    End If
    PostMessage cmbDateStart.hwnd, CB_SHOWDROPDOWN, 0, 0
    cmbDateStart.Refresh    'here we shoe the datetimepickercontrol popup
End Sub

missing refresh and SelText Property for combobox