Force numeric value

[jgelpi16]

So I have a combo box that is passing a value to a variable that must be defined as integer. The combo box is bound on an Autonumber field. However, when a null value is passed to the variable it is still passing a "" vs. 0. I am sure there is code to force the value of 0 to be passed if the value is null. I have included the piece of code for reference (varMetricNumber is the one I am concerned with). Thanks in advance.

    Dim varMetricName, varDataNumber
    Dim varMetricNumber As Integer
    
    varDataNumber = Form_frmFindMetric.cboDatamartName.Value
    varMetricName = Form_frmFindMetric.cboMetricName.Value
    varMetricNumber = Form_frmFindMetric.cboMetricNumber.Value

[pbaldy]

Check out the Nz() function.

[jgelpi16]

Tried Nz() and I'm still getting "type mismatch".

varMetricNumber = Nz(Form_frmFindMetric.cboMetricNumber.Value, 0)

[weekend00]

varMetricNumber = cint(Nz(Form_frmFindMetric.cboMetricNumber.Value, "0"))

and you may need to change
varDataNumber = Form_frmFindMetric.cboDatamartName.Value
to
varDataNumber = cint(Form_frmFindMetric.cboDatamartName.Value)
as well

[pbaldy]

What does the form control contain?

[jgelpi16]

That didn't solve the issue either...Still returned a "type mismatch" error. I gave up and just used the below IF statement. Thanks for the help.

    If Form_frmFindMetric.cboMetricNumber.Value <> "" Then
        varMetricNumber = Form_frmFindMetric.cboMetricNumber.Value
    End If