Visual Basic

15-Mar-07 12:55

i modified the code check it....
i did in this way only but still list(of textbox) and isnot line are giving errors.

Re: thanks

TwoFaced15-Mar-07 12:59

15-Mar-07 12:59

Check my last post again...I made a modification. Also what is the error your getting with the IsNot line. I don't know when IsNot was added but perhaps you should try 'Not txt is txtSender' instead

perfect...

manni_n15-Mar-07 13:12

15-Mar-07 13:12

this code is not workin man, its flying...
great job...
i am really thankful to ya alot...
now i think i can frealy go for a sleep...
i was tryn differnt logics for this validations from last 10 hours..
feeling gud now..
bubye buddy..
thanks again and gud night.

check it...

manni_n15-Mar-07 13:23

Re: check it... [modified]

15-Mar-07 13:23

there is one more problem in it...
suppose in textbox1 i have filled integer 3
and in textbox2 i have to fill 31, so the moment i press 3 in textbox2 it will show the error that same value...
it wont wait for the 1 to get typed...

TwoFaced15-Mar-07 14:07

15-Mar-07 14:07

Yup, thats right. I recomend the validation event. Personally I wouldn't validate text in the manner you want as it changes for the very reason you are now experiencing. What you need to do is create a new procedure to handle the validation event. This is the declaration of that procedure.

Private Sub txtBox_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs)

End Sub

You should move the validation code into this procedure. Then you'll need to change the addhandler statement. The event should be validating and the part that goes after addressof should be the name of the procedure ie. txtBox_Validating. The validating event fires just before the focus changes. In the validating event you can use e.cancel = true to prevent focus from leaving the textbox. So if the text isn't validated you can display a message and cancel the change of focus.

One more thing. Use this

If not txt Is txtSender AndAlso txt.Text = txtSender.Text AndAlso txt.Text <> "" Then

instead of the current line you have otherwise validation will fail if a textbox is empty because other textbox's are empty. I should have changed that earlier. I forgot to mention it.

manni_n16-Mar-07 1:05

16-Mar-07 1:05

yeah i had done this thing of validating the empty textbox...
but i am affraid this e.cancel = true is not working dude...
i am using VS 2003. i think this code must be valid in 2005.
only this thing is stucked rest everything is running fine....
any other method u might be having...

TwoFaced16-Mar-07 6:30

16-Mar-07 6:30

Sorry, that's the only event I know of. I've never used 2003 so I'm not aware of the differences but it does work in 2005. If it's not working for you I'm not sure what to do. I think that's still the right place to do the validation however. You'll just have to come up with a workaround. For one, calling a controls focus method will make that control active. So you could do that inside the validating event if validation fails. At least that way you can bring the users attention back to that control.

manni_n16-Mar-07 8:34

16-Mar-07 8:34

no buddy, i have checked every second method which i was knowing, to do this
validation.
i also tried to used gotfocus validation of textbox.but i think every effort went into vein.
as i am using back end also so i tried to validate this through backend validation.
like if the value in the textbox is same then it wont enter in DB and gives an error. But i think this will be the bad logic..
i cant do anything as i am left with this only...
nyways after using your method fully now i am only stuck at this problem, my every second problem is solved by you reagardin this..the only thing left is it shud not validate untill the user moves to other controll.
sending u the code agian jst have alook and check out if something can be done or not....
nyways thanks....
you really helped alot , i'll make sure in future that i could help you in some way and repay you...

Public class form1<br />
  Inherits System.Windows.Forms.Form<br />
Private TextBoxCollection As New ArrayList<br />
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br />
<br />
        For Each ctrl As Control In Me.Controls<br />
            If TypeOf ctrl Is TextBox Then<br />
                TextBoxCollection.Add(DirectCast(ctrl, TextBox))<br />
                AddHandler ctrl.TextChanged, AddressOf txtvalidate_validating<br />
                'e.cancel = True<br />
            End If<br />
        Next<br />
<br />
    End Sub<br />
    Private Sub txtvalidate_validating(ByVal sender As Object, ByVal e As EventArgs)<br />
<br />
        Dim txtSender As TextBox = DirectCast(sender, TextBox)   <br />
        For Each txt As TextBox In TextBoxCollection    <br />
            If Not txt Is txtSender AndAlso txt.Text = txtSender.Text AndAlso txt.Text <> "" Then<br />
                 CType(sender, TextBox).Text = CStr(txt.Text)<br />
                MsgBox("You have already filled this value")<br />
                Exit For<br />
            End If<br />
        Next<br />
<br />
    End Sub<br />

TwoFaced16-Mar-07 10:13

16-Mar-07 10:13

Okay I see the mistake. Well I assume it's a mistake. Maybe you reverted back to using the TextChanged event because you couldn't get it to work, but I'll assume for the moment you didn't. When you use AddHandler you never changed the event that would be handled.

The following line
AddHandler ctrl.TextChanged, AddressOf txtvalidate_validating

Should be:
AddHandler ctrl.Validating, AddressOf txtvalidate_validating

The portion after Addhandler is the event that gets handled. The portion after addressof is the method that does the handling. In this case we want to handle the validating event which is the change I made above.

e.cancel = true should occur when validation fails. Also you changed the parameters for the txtValidate_Validating procedure. Probably because you were getting errors do to the fact that the event you were trying to handle was the TextChanged event and not the validating event.

The final code should be this:

Public Class Form1<br />
    Inherits System.Windows.Forms.Form<br />
    Private TextBoxCollection As New ArrayList<br />
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br />
        For Each ctrl As Control In Me.Controls<br />
            If TypeOf ctrl Is TextBox Then<br />
                TextBoxCollection.Add(DirectCast(ctrl, TextBox))<br />
                AddHandler ctrl.Validating, AddressOf txtvalidate_validating<br />
            End If<br />
        Next<br />
    End Sub<br />
<br />
    Private Sub txtvalidate_validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs)<br />
        Dim txtSender As TextBox = DirectCast(sender, TextBox)<br />
        For Each txt As TextBox In TextBoxCollection<br />
            If Not txt Is txtSender AndAlso txt.Text = txtSender.Text AndAlso txt.Text <> "" Then<br />
                MsgBox("You have already filled this value")<br />
                e.Cancel = True<br />
                Exit For<br />
            End If<br />
        Next<br />
    End Sub<br />
End Class

If there is a problem with this code it's because of differences in 2003 vs 2005. But this code works perfectly under 2005.

cool... [modified]

manni_n16-Mar-07 11:06

16-Mar-07 11:06

its ok and fine...
the line in which u have modified should be having validated in place of validating coz controll is validated after the focus is off, like this
still e.cancel is not working and showing the error that cancel is not the member of system.eventarg but its ok...i'll rectify this part through my database, by dissaloving the user to insert blank value..

AddHandler ctrl.Validated,AddressOf txtvalidate_validating<br />

now its working working perfectly...
thanks...

-- modified at 17:14 Friday 16th March, 2007

Re: cool...

TwoFaced16-Mar-07 12:11

16-Mar-07 12:11

The events fire in this order:
LostFocus
Validating
Validated

'Cancel' is not a property of the system.eventarg object which is the object the Validated event recieves. 'Cancel' IS a property of the System.ComponentModel.CancelEventArgs which is the object the Validating event recieves. I don't understand why you think the validation should occur in the validated event. There is no reason the validation shouldn't be done in the validating event and one very good reason why it should be. This reason would be that you can prevent other controls from responding to the user before they have inserted valid data. I'm glad you've got it working though. As long as it works the way you want I see no reason to change it.

Checked List Box

taherjaorawala14-Mar-07 21:46

taherjaorawala

14-Mar-07 21:46

Dear Friends,

I have ckecked list box in the form but it should work as a radio buton. the user can only select one option fom the checked list box.

How can I do it. Please help.

Thanx in advance.

Taher

Re: Checked List Box

manni_n14-Mar-07 23:13

Typed dataset, insert, return output parameter

14-Mar-07 23:13

then gofor combobox man
why to increase overhead and complexities...

steve_rm14-Mar-07 19:38

steve_rm

14-Mar-07 19:38

Hello,

I have created a new insert procedure to insert a new incident record in the typed dataset designer in the datatable. I want to have the incidentID with is auto generated returned.

I have been playing around with the properties of the insert procedure, but can't find any way to return the incidentID number.

The code I have used for inserting is the following

<br />
INSERT INTO Incident (Company, CompanyID, Priority, Status, Subject, AssignedTo) VALUES (@Company,@CompanyID,@Priority,@Status,@Subject,@AssignedTo) SELECT @IncidentID = SCOPE_IDENTITY()<br />

The code for calling the insert is the following:

<br />
Me.TA_Incident_dsComponent_Equipment1.Insert(Me.cboCustomers.Text, Me.cboCustomers.SelectedValue, "Normal", "Not Started", Me.txtSubject.Text, Me.cboAssignIncident.SelectedValue)<br />

Many thanks with any help.

Steve

Re: Typed dataset, insert, return output parameter

Steven J Jowett15-Mar-07 1:57

Steven J Jowett

15-Mar-07 1:57

Are you using an SQL Server stored procedure and you want the row Id of the newly inserted record to the table?

Steve Jowett
-------------------------
Sometimes a man who deserves to be looked down upon because he is a fool, is only despised only because he is an 'I.T. Consultant'

Total Hours and minutes

Member 387988114-Mar-07 19:03

Member 3879881

14-Mar-07 19:03

Hi i have intime(08:45) and outtime(20:16)=>24 hours format...,
Now i want to calculate between the time how many hours and minutes like...,
Plz help me,i need that codes.........,
Regards,
Smile | :)

Magi

Tirthadip14-Mar-07 23:39

Tirthadip

14-Mar-07 23:39

if you are using VB.NET then try-----------

Dim intime As DateTime<br />
dim outtime as datetime<br />
<br />
Dim tspan As TimeSpan = outtime.Subtract(intime

)

hope this will work.

Live life to the fullest

Member 387988114-Mar-07 23:56

Member 3879881

14-Mar-07 23:56

but how to assign that tspan value in one textbox?
Plz reply..........

Magi

coolestCoder15-Mar-07 2:25

coolestCoder

15-Mar-07 2:25

Hi,
check this[^]

"A good programmer is someone who looks both ways before crossing a one-way street." -- Doug Linder

coolestCoder