Vydělávej až 160.000 Kč měsíčně! Akreditované rekvalifikační kurzy s garancí práce od 0 Kč. Více informací.
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.
Avatar
Miroslav Holubek:6.2.2014 10:24

Ahojte, chcel by som sa spytat ako mozem skontrolovat dajme tomu 30 textboxov v programe tak, aby som nemusel vypisovat pomienku pre kazdy zvlast... proste nejake rychlejsie a elegantnejsie riesenie
pisem vo VB dik

 
Odpovědět
6.2.2014 10:24
Avatar
Odpovídá na Miroslav Holubek
Michal Žůrek - misaz:6.2.2014 10:40

Projdi si kolekci Controls, tam jsou všechny prvky, ověř si že se jedná o textBox a pak ho zpracuj.

 
Nahoru Odpovědět
6.2.2014 10:40
Avatar
Miroslav Holubek:6.2.2014 11:15

vdaka, nieco som nacmaral a funguje to, aj si niesom isty spravnostou mojho riesenia :D prilozim kod

For i = 0 To Me.Controls.Count - 1
    Dim xType As String = Me.Controls.Item(i).GetType.Name
    If xType = "TextBox" Then
        Dim xName As TextBox = Me.Controls.Item(i)
        If xName.Text = "" Then
            MsgBox(xName.Name & " je prazdne")
        End If
    End If
Next
 
Nahoru Odpovědět
6.2.2014 11:15
Avatar
hanpari
Tvůrce
Avatar
hanpari:6.2.2014 12:10

Tohle by mělo fungovat, jen nevím, co se stane, kdyby ten control neměl vlastnost text. V c# bych věděl, že po && se nebude další podmínka kontrolovat.

For Each c As Control In Me.Controls
        If TypeOf(c) Is TextBox  And c.Text="" Then
                MsgBox("Prazdne")
        End If

Next
 
Nahoru Odpovědět
6.2.2014 12:10
Avatar
Miroslav Holubek:6.2.2014 12:14

vdaka, este lepsie riesenie :D len este mam taky problem, ze ja nechcem kontrolovat vsetky textboxy, takze to budem musiet upravit ale s tym su uz hadam poradim :)

 
Nahoru Odpovědět
6.2.2014 12:14
Avatar
hanpari
Tvůrce
Avatar
hanpari:6.2.2014 12:34

Tak využij vlastnost Tag. Nastav ji na určitou hodnotu u těch textboxů, které chceš kontrolovat, a pak jen pracuj s těmi, které ji mají.

Tím pádem nemusíš ani kontrolovat, zda jde o textbox, ale o prvek, který má Tag nastaveny na tu hodnotu.

 
Nahoru Odpovědět
6.2.2014 12:34
Avatar
Miroslav Holubek:6.2.2014 12:40

Super tak uz to mam presne tak ako chcem, velka vdaka vam obom :)

 
Nahoru Odpovědět
6.2.2014 12:40
Avatar
hanpari
Tvůrce
Avatar
Odpovídá na Miroslav Holubek
hanpari:6.2.2014 12:51

Není zač :) Měj se

 
Nahoru Odpovědět
6.2.2014 12:51
Avatar
Michal Štěpánek:24.2.2014 0:39

Položky na formu mají vlastnost CausesValidation (musí nebo nemusíbýt vyplněny). U těch, které kontrolovat nechceš, nastavíš tuto vlastnost na False.

For Each tb In Me.Controls.OfType(Of TextBox)()
            tb.BackColor = Color.White
            If tb.CausesValidation = True And tb.Text = "" Then
                tb.BackColor = Color.Pink

            End If
        Next
Nahoru Odpovědět
24.2.2014 0:39
Nikdy neříkej nahlas, že to nejde. Vždycky se totiž najde blbec, který to neví a udělá to...
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 9 zpráv z 9.