Variable Error

[WERNER SLABBERT]

Hi My VB Errors out here
*Compile error
Variable not defined*

Private Sub cmdNew_Click()
    
    Dim answer As Variant
    
    blnNew = True
    
   :crash: txtContactPerson.Text = "":crash:
    txtCustomerNumber.Text = ""
    txtCustomerPhone.Text = ""
    txtCustomerLandline.Text = ""
    txtCustomerEMail.Text = ""
    txtCustomerAdress1.Text = ""
    txtCustomerAdress2.Text = ""
    txtCustomerAdress3.Text = ""
    txtCustomerAdress4.Text = ""
    
    cmdClose.Caption = "Cancel"
    cmdNew.Enabled = False
    cmdDelete.Enabled = False
End Sub

 

[Norie]

It looks like you haven't declared blnNew but if the error is where you are indicating with '' you might want to check you have a control named 'txtContactPerson'.

 

[mandukes]

Try it:

Private Sub cmdNew_Click()

Dim answer As Variant
Dim blNew as Boolean
blnNew = True

txtContactPerson.Text = "crash"
txtCustomerNumber.Text = ""
txtCustomerPhone.Text = ""
txtCustomerLandline.Text = ""
txtCustomerEMail.Text = ""
txtCustomerAdress1.Text = ""
txtCustomerAdress2.Text = ""
txtCustomerAdress3.Text = ""
txtCustomerAdress4.Text = ""

cmdClose.Caption = "Cancel"
cmdNew.Enabled = False
cmdDelete.Enabled = False
End Sub

 

[Norie]

Try removing this,

blnNew = True

it's not declared or used anywhere in the posted code.