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?