1 - 5 – Visual Basic – Fórum – Programujte.com

Nevíte jak v TextBoxu nastavit, aby se do něj dala vepisovat pouze čísla od 1 do 5.

Regulérní výrazy http://www.regularnivyrazy.info/

no nebo můžeš nastevit maxlenght, v události change používat IsNumber a pak porovnávat jeho velikost a případně smazat

To Sunmay : Já jsem čerstvý začátečník, tak jestli by to bylo možné trochu víc vysvětlit..... Ale i tak děkuju.

nemám ted VB tak píšu jen z hlavy ale mělo by to fungovat dá se to samozřejmě napsat líp, ale ted sem s VB dlouho nedělal a některé finty už si nepamatuju.

Private Sub Text1_Change()
If IsNumeric(Text1.Text) = False Then Text1.Text = ""
If Len(Text1.Text) > 1 Then Text1.Text = Left(Text1.Text, 1)
If Val(Text1.Text) > 5 Or Val(Text1.Text) < 1 Then Text1.Text = ""
Text1.SelStart = 1 'není nutný
End Sub

Nejde to je tam chyba (Left) když na to najedu ta kse tam ukáže: Public Property Left() As Integer' has no parameters and its return type cannot be indexed.

to je nějké divné máš VB6.0

Ne já mám Visual Basic 2008 Express

Aha tak ten zase nemám já ale bude tam nějaká adekvátní funkce, místo funkce left, zkus v knihvně funkcí vyhledat funkce pro práci s textem a určitě tam něco podobného bude.