zeichen überprüfen
27.08.2006 17:26:58
Massimo
möchte in einer combobox die eingabe überprüfen.
1. es darf keine zahl sein
> das funktioniert
2. die eingabe muss so aussehen
die ersten zwei zeichen müssen buchstaben sein + "_" z.b. db_......
oder 4 buchstaben + "_" z.b. dbcm_.......
folgende habe ich probiert, ohne erfolg
Private Sub a_name_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(a_name.Text) = 0 Then Exit Sub
If IsNumeric(a_name.Text) Then
MsgBox "Zahlen sind nicht erlaubt!"
Cancel = True
ElseIf Left(a_name.Text, 5) = "_" Or _
Left(a_name.Text, 3) = "_" Then Exit Sub
MsgBox "Der Attributname muss so aussehen eichen_xxx oder 4zeichen_xxx"
Cancel = True
End If
End Sub
....ich benutze das Left() falsch oder?