[RESOLVED] Textbox_Validate (In SSTab)

[DubweiserTM]

Hi everybody !

I have some textboxes in different Tab of SSTab...

When the focus is on textbox and I click on another Tab, is it normal that the textbox_validate is not fired ???

CausesValidation is set to True for the SSTab and the Textboxes...

Thanks in advance !

[RhinoBull]

Of course it fired but following events depend on how you do your validation - you have to raise the Cancel flag:

Private Sub Text1_Validate(Cancel As Boolean)
    If Not IsNumeric(Text1.Text) Then
        Cancel = True
    End If
End Sub

[DubweiserTM]

Here is my code, sorry some words are in french:

When the focus is on txtArmoCompt, I can click on another Tab even if txtArCompt is empty ???

Private Sub txtArmoCompt_Validate(KeepFocus As Boolean)
        'Assigner valeur vers variable
        Dim strTempString
        strTempString = txtArmoCompt.Text
        
        'Remplace toutes les espaces par rien
        strTempString = Replace(strTempString, " ", "")
        
        'Si nombre de caractère égale à zéro
        If Len(strTempString) = 0 Then
                'Message d'erreur
                MsgBox msgMessage31, vbInformation, msgTitre31
                'Garde focus sur Textbox
                KeepFocus = True
        End If
End Sub

Thanks !

[RhinoBull]

Ah, that's because you replace spaces in the variable rather than in the textbox itself:

'if you would replace this
strTempString = Replace(strTempString, " ", "")
 
'with this - it should work
txtArmoCompt.Text = Replace(txtArmoCompt.Text, " ", "")
 
'OR do this instead:
Private Sub Text1_Validate(KeepFocus As Boolean)
    If Trim(Text1.Text) = "" Then
        MsgBox "Textbox is empty", vbInformation, "Error"
        KeepFocus = True
    End If
End Sub

[DubweiserTM]

Private Sub Text1_Validate(KeepFocus As Boolean)
    If Trim(Text1.Text) = "" Then
        MsgBox "Textbox is empty", vbInformation, "Error"
        KeepFocus = True
    End If
End Sub

I tried with this, I can't go on another textbox but I can go on another TAB ???

[RhinoBull]

That is not possible IF focus is currently in the textbox you're validating ...

[DubweiserTM]

That is not possible IF focus is currently in the textbox you're validating ...

You're ok !

I started a new project and I put a SSTab and 2 textboxes, and I can't go to another Tab...

I dont know why in my program I can ???

[RhinoBull]

Debug it - make sure you're not setting some flags anywhere to "bypass" some logic.

[DubweiserTM]

Debug it - make sure you're not setting some flags anywhere to "bypass" some logic.

Sorry for this newbie question: What is flags ???

Thanks !

[RhinoBull]

Those are just variables - could be any type but mostly Integer and/or Boolean.
If you need to omit (or instead excute) certain part in your program you will raise "flag" like intIgnore = 1 or blnIgnore = True and when specific logic is finish excuting then you will reset it back to 0(ZERO) or False.
That's a very common programming technic.