VB.NET

VB.NET RSS

Using string variables in a label or text box?

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: May 2003

Posts: 36

Reputation: Mr Gates is an unknown quantity at this point

Solved Threads: 0

Mr Gates

Offline

Light Poster

Using string variables in a label or text box?

Jul 14th, 2003

Here's an example, but Visual basic gives me an error when trying to run it. Say I wanted to ask the user for their name, then display it like: "Hello there" strName
By the way, my CDs finally came Friday, so I have VB .NET, but this was done in VB6.

--------------
Private Sub cmdStart_Click()
Dim strName As String
strName = txtName.Text
If txtName.Text = "" Then
MsgBox "Please Enter a Name",,"Error"
Else
lblGreeting.Caption = "Hello there" strName
txtName.Text = ""
End If
End Sub
---------------

•

Join Date: May 2003

Posts: 307

Reputation: big_k105 is an unknown quantity at this point

Solved Threads: 2

big_k105

Offline

PFO Founder

Re: Using string variables in a label or text box?

Jul 14th, 2003

Help with Code Tags

VB.NET Syntax (Toggle Plain Text)

 lblGreeting.Caption = "Hello there" strName

i cant quite remember which you need to us but that line of code should look like this

Help with Code Tags

VB.NET Syntax (Toggle Plain Text)

 lblGreeting.Caption = "Hello there" & strName

Help with Code Tags

VB.NET Syntax (Toggle Plain Text)

 lblGreeting.Caption = "Hello there" + strName

try them both out, im actually pretty sure that it is "+" so give that a try first

Kyle aka BIG K

Programming Forums
Kyle K Online

•

Join Date: May 2003

Posts: 36

Reputation: Mr Gates is an unknown quantity at this point

Solved Threads: 0

Mr Gates

Offline

Light Poster

Re: Using string variables in a label or text box?

Jul 14th, 2003

They both work. I looked it up on a book I had, I guess before when I was searching I was just looking in the wrong place. Both + and & are used for string concatenation. Thanks for the help.

•

Join Date: May 2003

Posts: 36

Reputation: Mr Gates is an unknown quantity at this point

Solved Threads: 0

Mr Gates

Offline

Light Poster

Re: Using string variables in a label or text box?

Jul 14th, 2003

I also had another queston, what if I wanted to use that same button for a different procedure. Like if I wanted to write an event procedure for the second time it was clicked.

•

Join Date: May 2003

Posts: 307

Reputation: big_k105 is an unknown quantity at this point

Solved Threads: 2

big_k105

Offline

PFO Founder

Re: Using string variables in a label or text box?

Jul 14th, 2003

i will have to get back to you on this. i will have to go and look in vb and i am on linux right now so i will go over to my windows partition after while and see what i can come up with for you.

Kyle aka BIG K

Programming Forums
Kyle K Online

•

Join Date: Feb 2002

Posts: 898

Reputation: Tekmaven is a glorious beacon of light

Solved Threads: 28

Tekmaven

Offline

The C# Man, Myth, Legend

Re: Using string variables in a label or text box?

Jul 14th, 2003

Okay, in response to your first question, it is ALWAYS better to use & when connecting strings.

For your second, you would need to declare an integer or something on top of the forms codebehind (in the general declarations area) and use it as a counter. Then you can have if counter = 1 then do whatever, etc.

-Ryan Hoffman

.NET Specialist / Webmaster, Extended64.com.
Please do not email or PM me with support questions. Please direct them to the forums instead.

•

Join Date: May 2003

Posts: 36

Reputation: Mr Gates is an unknown quantity at this point

Solved Threads: 0

Mr Gates

Offline

Light Poster

Re: Using string variables in a label or text box?

Jul 14th, 2003

That seems to sound plausible. So I would do something like:

-------
Option Explicit
Dim intCounter As Integer
intCounter = 0

Private Sub cmdStart_Click()
Dim strName As String
strName = txtName.Text
intCounter = intCounter + 1
If intCounter = 1 Then
ElseIf txtName.Text = "" Then
MsgBox "Please Enter a Name",,"Error"
Else
lblGreeting.Caption = "Hello there" strName
txtName.Text = ""
lblGreeting.Caption = "What do you want to talk about?"
End If
If intCounter = 2 Then
ElseIf txtName.Text = "" Then
MsgBox "Please Enter Something to talk about",,"Error"
Else
lblGreeting.Caption = "Well, " & strName & " sounds fun"
txtName.Text = ""
End If
End Sub
---------

Would this be easier using Select Case, or what else could be an option? I'm trying to create a chat bot to talk to for an exercise, and I think things could get messy if I kept doing that.

Edit: Nevermind, that didn't work. It went right to the second case. (If counter = 2) Any Ideas?

•

Join Date: May 2003

Posts: 307

Reputation: big_k105 is an unknown quantity at this point

Solved Threads: 2

big_k105

Offline

PFO Founder

Re: Using string variables in a label or text box?

Jul 14th, 2003

im sure the case would work great and probably be alot nicer looking. could you post the code you used so we can see why it didnt work. cause it should work great.

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Option Explicit
Dim intCounter As Integer
 
Private Sub cmdStart_Click()
    Dim strName As String
    strName = txtName.Text
    intCounter = intCounter + 1
 
    Select Case intCounter
        Case Is = 1
            If txtName.Text = "" Then
                MsgBox "Please Enter a Name", , "Error"
            Else
                lblGreeting.Caption = "Hello there" & strName
                txtName.Text = ""
                lblGreeting.Caption = "What do you want to talk about?"
            End If
        Case Is = 2
            If txtName.Text = "" Then
                MsgBox "Please Enter Something to talk about", , "Error"
            Else
                lblGreeting.Caption = "Well, " & strName & " sounds fun"
                txtName.Text = ""
            End If
    End Select
End Sub
 
Private Sub Form_Load()
    lblGreeting.Caption = "What is your Name?"
    intCounter = 0
End Sub
Option Explicit
Dim intCounter As Integer

Private Sub cmdStart_Click()
    Dim strName As String
    strName = txtName.Text
    intCounter = intCounter + 1
    
    Select Case intCounter
        Case Is = 1
            If txtName.Text = "" Then
                MsgBox "Please Enter a Name", , "Error"
            Else
                lblGreeting.Caption = "Hello there" & strName
                txtName.Text = ""
                lblGreeting.Caption = "What do you want to talk about?"
            End If
        Case Is = 2
            If txtName.Text = "" Then
                MsgBox "Please Enter Something to talk about", , "Error"
            Else
                lblGreeting.Caption = "Well, " & strName & " sounds fun"
                txtName.Text = ""
            End If
    End Select
End Sub

Private Sub Form_Load()
    lblGreeting.Caption = "What is your Name?"
    intCounter = 0
End Sub

i should have waited till you gave me what you had but i really wanted to do it. :oops: but this worked great for me. and i dont think you can initiate a variable in the Option Explicit. you should do it in the form load like i did above

Kyle aka BIG K

Programming Forums
Kyle K Online