Avatar of December2000
December2000
 asked on

Text Boxes in VB.Net

How do I change this code to display an ongoing record of the log in's in the txtResults text box. Right now it will only show one log in at a time....

Public Class Form1

    Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _
            btn0.Click, Btn1.Click, Btn2.Click, btn3.Click, btn4.Click,
            btn5.Click, btn6.Click, btn7.Click, btn8.Click, btn9.Click, btn0.Click

        Dim btn As Button = DirectCast(sender, Button)
        txtNumber.Focus()
        txtNumber.SelectedText = btn.Text
    End Sub

    Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
        txtResults.Clear()
        txtNumber.Clear()
    End Sub


    Private Sub btnEnter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnter.Click
        Dim intResults As Integer
        If Integer.TryParse(txtNumber.Text, intResults) Then
            Select Case intResults
                Case 1000 To 1600
                    txtResults.Text = DateTime.Now() & " Technical Personnel"
                    Exit Sub

                Case 8001 To 8005
                    txtResults.Text = DateTime.Now() & " Custodial Sevices"
                    Exit Sub

                Case 999898, 1000001 To 1000008
                    txtResults.Text = DateTime.Now() & " Scientific Personnel"
                    Exit Sub

            End Select
        End If
        txtResults.Text = DateTime.Now() & " Access Denied"
    End Sub

End Class

Open in new window

Programming Languages-Other.NET ProgrammingVisual Basic.NET

Avatar of undefined
Last Comment
December2000

8/22/2022 - Mon
ASKER CERTIFIED SOLUTION
Mike Tomlinson

Log in or sign up to see answer
Become an EE member today7-DAY FREE TRIAL
Members can start a 7-Day Free trial then enjoy unlimited access to the platform
Sign up - Free for 7 days
or
Learn why we charge membership fees
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
Not exactly the question you had in mind?
Sign up for an EE membership and get your own personalized solution. With an EE membership, you can ask unlimited troubleshooting, research, or opinion questions.
ask a question
Haver Ramirez

I dont understand.
December2000

ASKER
@Idle_Mind Thank you... you get me.... I am still learning the correct vocabulary and phrases thank you for being so nice to me :)
Experts Exchange is like having an extremely knowledgeable team sitting and waiting for your call. Couldn't do my job half as well as I do without it!
James Murphy