Tema: Re: Index
Autorius: VaidasB
Data: 2010-04-15 11:01:55
Naudojam castinimą:

       For Each vControl As Control In Me.Controls
             If (TypeOf vControl Is Label) And CType(vControl, 
Label).Tag = 1 Then
                 vControl.Enabled = False
             End If
         Next

nu masyvas tai taip :)

         Dim masyvas(5) As Label
         masyvas(1) = Label1

On 2010.04.15 10:37, Valdas wrote:
> vb 2005 neturi to i (Controls[i].Tag ), o kaip labelius i masyva sudet ?
>
> "VaidasB"<vaidasTrinti@pmbalticTrinti.lt>  wrote in message
> news:hq6e0h$34h$1@trimpas.omnitel.net...
>> dabar neturiu po ranka to VB, bet principas bûtø:
>> imi controlsus ið atitinkammos formos ar kito konteinerio. Form.Controls
>> ar panaðiai turi bût.
>> Suki juos cikle ir tikrini
>> if Controls[i].Tag = 18 then Controls[i].Visible = false :)
>>
>> arba pigiau - susidëk reikiamus labelius á masyvà :) ir galësi su jais
>> þaist cikle.
>>
>>
>>
>>
>> On 2010.04.15 09:55, Valdas wrote:
>>> tag visai kas kita, kaip va toki vb6 koda paversti vb2005 kodu ?
>>>
>>> for i=0 to 10
>>>       label1(i).visible=false
>>> next
>>>
>>> "VaidasB"<vaidasTrinti@pmbalticTrinti.lt>   wrote in message
>>> news:hq6c0b$vrg$1@trimpas.omnitel.net...
>>>> Tag netinka?
>>>>
>>>> On 2010.04.15 09:16, Valdas wrote:
>>>>> Sveiki, VB6 mygtukai turejo tokia savybe kaip index, o jau VB2005 to
>>>>> nebera,
>>>>> tai gal kazkoks kitas atitikmuo yra ?, nes dabar kai reikia
>>>>> uzdisablinti
>>>>> tarkim 10 mygtuku tai desimt eiluciu ir rasyti reikia, o vb6 talpini i
>>>>> cikla
>>>>> ir baigta.
>>>>>
>>>>> aciu
>>>>>
>>>>>
>>>
>>>
>
>