Hi,
In your own usercontrol of textbox, create this new event :
Public Event fieldValidation(ByVal _field as string)
Then define a method that'll raise that event :
Private Sub mytextbox_Validated(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Validated
Raise Event fieldValidation(Me.name)
End Sub
Then in your form define the fieldValidation procedure that handles
fieldValidation event of all textbox :
public sub fieldvalidation(byval _field as string) Handles
txtInvNo.fieldValidation, txtCompanyCode.fieldValidation
if _field = "txtInvNo" or _field = "CHECKALL"then
if me.txtInvNo.text.trim.length =0 then
messagebox.show("error")
blnFlag = false
end if
if _field = "txtCompanyCode" or _field = "CHECKALL"then
if me.txtInvNo.CompanyCode.trim.length =0 then
messagebox.show("error ")
blnFlag = false
end if
........
end sub
I notice that you are doing the same test for all your textbox; so in my
opinion, inplement your test in your usercontrol of textbox :
Private Sub mytextbox_Validated(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Validated
if me.text.trim.length = 0 then
messagebox.show("error")
blnFlag = false
end if
End Sub
The advantages are :
- if you add or delete a textbox from your form, no need to add or remove
the if condition related;
- a small and easy "fieldvalidation" function to manipulate
Hope this help;
Regards
"Agnes" <ag***@dynamictech.com.hk> a écrit dans le message de
news:e4**************@tk2msftngp13.phx.gbl... I created my own usercontrol of textbox and my base from . Every windows
will inhertied this mybaseform and every textbox will use that
usercontrol. Now, mybaseform got a function "public overridables function
fieldvalidation(byval _fieldname as string) as boolean"
in my usercontrol's validated event, I want to pass the textbox's name to
that function.
Can I do that ??
my aim ; in each windows form e.g frmInvoice, with a textbox,
txtInvNo,txtCompanyCode.
I want to use a "simple" and global way to pass the 'txtInvNo' to the
fieldvalidation()
public ..... function fieldvalidation(byval _field as string) as boolean
if _field = "txtInvNo" or _field = "CHECKALL"then
if me.txtInvNo.text.trim.length =0 then
messagebox.show("error")
blnFlag = false
end if
if _field = "txtCompanyCode" or _field = "CHECKALL"then
if me.txtInvNo.CompanyCode.trim.length =0 then
messagebox.show("error ")
blnFlag = false
end if
........
end func
I want to create a BIG function to do the field valiation , instead of do
it in each textbox's validated event.
Anyone understand my question ?
Thanks in advance