Help please

[JJones34]

Can someone help me with a quick project.. The program consists of making 2 text boxes, one labeled Age, and one labeled Name.

The Name text box must return the name in all uppercase.
If the Age text box isn't filled with a numerical value, you should receive a message saying "need a number" and return your cursor to the age box.
2 command buttons "Process" and "Exit"

Any help? I tried getting started, but I usually always work better when i have a beginning!
Thanks!

[knxrb]

Put 2 textboxes on your form and 2 buttons.
Then in the button click event for button 1 add this:

Messagebox.Show("Textbox 1 text in uppercase = " & TextBox1.Text.ToUpper() & Environment.NewLine & "Textbox 2 text is numeric = " & IsNumeric(TextBox2.Text))

TextBox1 = Name textbox
TextBox2 = Age textbox
Button1 = Process button
Button2 = Exit button

[JJones34]

okay i will give it a shot, thanks for your help!!

[JJones34]

hey i tried that, it says runtime error... I am using Visual basic 6.0.... the directions i had were along the lines using the code Name=(ucase)....
do you know anything like this?

[Atheist]

Welcome to VBForums.
You could just set the TextBox' CharacterCasing property to Upper and everything written in the TextBox will always be all uppercase.

As for the numeric TextBox, this has been discussed over and over on VBF.
One way to do this is to not allow anything but numbers to be added in the first place, by doing something like this:

Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
        If Not Char.IsNumber(Char.ConvertFromUtf32(e.KeyValue)) Then
            e.SuppressKeyPress = True
        End If
    End Sub

Another way is to simply use a NumericUpDown instead, which is designed for just these kinds of things.

OR, keep the TextBox as is, and use Integer.TryParse:

Dim value As Integer
        If Integer.TryParse(TextBox1.Text, value) Then
            'TextBox contained a valid integer. The variable value contains the integer.
        Else
            MessageBox.Show("Enter a valid integer")
        End If

Edit: VB6 eh? Well... you've posted in the wrong forum then.

[knxrb]

Oh, you've posted this in the VB.Net forum.
I'll get a solution for you in a minute...

*See post #9

[Hack]

I am using Visual basic 6.0....

Moved to Visual Basic 6 And Earlier

I'm not surprised you were getting an error. You were trying to run VB.NET code in a VB6 app.

Your use of UCase is correct.

[JJones34]

okay, wow thanks for the timely help. You guys sure know what you're talking about! Thanks again... knxrb- could you get me the exact code to type in? It seems as if once i get the exact code, and make my own adjustments i learn much easier. That is how i got through Cobol!!

[knxrb]

Here you go:
Add 2 textboxes and 2 buttons like before and put this in the process button click event:

 MsgBox ("text1.text uppercase = " & UCase(Text1.Text) & vbCrLf & "is text2.text numeric = " & IsNumeric(Text2.Text))

[JJones34]

Thank you! .. things are starting to work! However, is there somehow I can get it to change the text in the box to uppercase... right now it just pops up a message saying txtName.text = MIKE
and is txtAge.text numeric = True

Can i Email you a copy of the compiled program?

[JJones34]

I have a working .exe of the program, however my version is still a little different then the correct .exe program... do you have an email i can forward it too, its a really small program, doesn't take more than 10 seconds to download.