Vb.net 日期时间选择器

Vb.net 日期时间选择器,vb.net,Vb.net,海,, 我正在使用vb.net,其中有一个日期时间选择器。当我改为约会时,我需要得到一条消息。 我已经用TextChanged事件完成了,但是当我单击datetime选择器的选择按钮时,消息会询问两次。 我怎么能过来呢。 我在文本更改事件中编写的代码如下: Private Sub dtpUptoFrom_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles dtpUptoFrom.TextChanged

海,, 我正在使用vb.net,其中有一个日期时间选择器。当我改为约会时,我需要得到一条消息。 我已经用TextChanged事件完成了,但是当我单击datetime选择器的选择按钮时,消息会询问两次。 我怎么能过来呢。 我在文本更改事件中编写的代码如下:

Private Sub dtpUptoFrom_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles dtpUptoFrom.TextChanged
        If bolDateChanged = True Then
            If objClsMsg.Show(Global.Components.clsMessagebox.errorTypes.userMsg, "This operation will reset the item details. Do you want to continue?", "", Global.Components.clsMessagebox.Buttons.YesNo, Global.Components.clsMessagebox.Icons.Question) = Global.Components.clsMessagebox.DialogResult.Yes Then
                If lngGateInId > 0 Then
                    Fill_ItemNames(lngGateInId)
                End If
            Else
                bolDateChanged = False
                dtpUptoFrom.Text = objClscom.GetServerDateTime
                ''cmbUptoBetween.SelectedIndex = 0
                bolDateChanged = True

            End If
        Else
            If enmOperation = Operations.Insert Then
                If lngGateInId > 0 Then
                    Fill_ItemNames(lngGateInId)
                End If
            End If
        End If
         End Sub

如何解决此问题?

处理
TextChanged
事件的sub
dtpUptoFrom\u TextChanged
更改
dtpUptoFrom.Text
属性,从而触发另一个
TextChanged
事件

您应该考虑使用<代码> ValueCudio< <代码>事件,而不是<代码> TeXTrime事件,和/或使用验证模型。