|
Visual Basic If Statement help
I am doing a project and i have a scroll bar that has QBColors on it as you go 1 - 15 it displays the colors in the picture box. it also has a text box to enter 1 - 15 to go to that QBColor. I was wondering how to make it so that if a value greater than 15 is entered into the text box to prompt the user and just stay at the max, 15.
|
if textbox1.text > 15 then msgbox "Please enter a digit between 1-15"
you might also want to do it so if they enter a value less than 1. if textbox1.text < 1 then msgbox "Please enter a digit between 1-15" i think these will help, but if they don't just say so, because it's been awile for me, so i might have made a mistake. |
You may also want to make sure that what they enter in the Textbox is actually a number before trying to use it as one.
|
Slap some Val() functions into Tylor's statement would work perfectly. Here is an example that does not use a msgbox (in general using msgboxs is bad programming practice).
Dim lastValue As Integer Private Sub Form_Load() lastValue = 1 Text1.Text = lastValue End Sub Private Sub Command1_click() If Val(Text1.Text) < 1 Or Val(Text1.Text) > 15 Then Text1.Text = lastValue Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Else lastValue = Text1.Text End If End Sub In this code I check to see if the value of the text is valid, and if is invalid I change it back to the last valid entry and highlight it. |
| All times are GMT -8. The time now is 08:55 PM. |
Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Optimization by vBSEO 3.6.0 PL2
© 2002-2012 Tilted Forum Project