taball0829
New member
- Local time
- Today, 12:06
- Joined
- Feb 23, 2018
- Messages
- 28
I would really like this inputbox to close automatically (AND it would be wonderful to get it to go to the next tabstop when closing) when there is a valid input.
OR, is there a better way to be able to input "b" or "v" into my GameX that must end up as an integer?
Private Sub Game1_GotFocus()
End Sub
OR, is there a better way to be able to input "b" or "v" into my GameX that must end up as an integer?
Private Sub Game1_GotFocus()
Dim str As String
str = InputBox("'b'lind" & Chr$(13) & Chr$(10) & "'v'acant" & Chr(13) & Chr$(10) & "or Score", "Enter Game 1")
If str = "b" Then
Me.Game1 = -(Me.current_avg - (Me.current_avg \ 10))
ElseIf str = "v" Then
Me.Game1 = -120
Else
Me.Game1 = Val(str)
End If