Vb6 空掩码编辑控件返回文本掩码

Vb6 空掩码编辑控件返回文本掩码,vb6,maskedtextbox,Vb6,Maskedtextbox,我有一个简单的表单,其中包含两个可选字段——FirstName、LastName、SSN和DOB。用户可以选择输入值或将其保留为空。我发现我的DOB maskedtextbox有问题。最初,如果用户不输入DOB,它将保存为null。稍后,用户可以选择编辑DOB。我看到的问题是,如果在编辑时用户没有在DOB中输入任何值,系统会将更改写入“##/#/#/#/#”这是我的掩码。因此,当我运行编辑时,用户只更改名字和姓氏,而DOB为空,我会收到一条错误消息:“从字符串转换日期/时间时转换失败。”我不确定

我有一个简单的表单,其中包含两个可选字段——FirstName、LastName、SSN和DOB。用户可以选择输入值或将其保留为空。我发现我的DOB maskedtextbox有问题。最初,如果用户不输入DOB,它将保存为null。稍后,用户可以选择编辑DOB。我看到的问题是,如果在编辑时用户没有在DOB中输入任何值,系统会将更改写入“##/#/#/#/#”这是我的掩码。因此,当我运行编辑时,用户只更改名字和姓氏,而DOB为空,我会收到一条错误消息:“从字符串转换日期/时间时转换失败。”我不确定是否应该在插入编辑之前将掩码“##/#/######”转换为Null?这是我的声明,以防DOB值发生变化。如果它这样做了,它会将更改写入表中。我对所有其他领域都有类似的说法,一切都很好

If Not IsNull(Me.mskDOB.Text) And Me.mskDOB.Text <> "" Then
      If IIf(IsNull(g_RS!DOB), "", g_RS!DOB) <> Me.mskDOB.Text Then
      g_strSQL2 = g_strSQL2 & " DOB = '" & Me.mskDOB.Text & "',"
End If
如果不为null(Me.mskDOB.Text)和Me.mskDOB.Text“”,则
如果IIf(IsNull(g_RS!DOB),“”,g_RS!DOB)Me.mskDOB.Text那么
g_strSQL2=g_strSQL2&“DOB=”&Me.mskDOB.Text&“,”
如果结束

MaskedEdit控件有一个属性,该属性表示:

指定文本属性值中是否包含提示字符


将此属性设置为
False
将允许您测试
文本
属性,以查看其是否为空(等于“”)。

您可以查看此属性。这里没有太多的信息。