Tema: Re: Index
Autorius: Valdas
Data: 2010-04-16 07:38:36
Aisku gerai kai yra visokiu iseiciu, bet elementarus index ant VB6 
ispresdavo visas problemas, kam ji reikejo panaikinti...

"Jornada Del Muerto" <ask@me.email> wrote in message 
news:hq7739$9bp$1@trimpas.omnitel.net...
>    Jap taip galima visus holderio controlus praeit .NET'e, bet jei gerai 
> pamenu jei jie bus kokiam nors groupBox tai teks jo controlus atskirai 
> pereidineti tam groupBox'e kaip holderyje..
>
>    1. Taip pat galima tokiu paciu budu tureti ir tik 1 event handleri 
> keliem eventam, pvz darai ivestu duomenu validacija ir reikia vistiek 
> tikrinti kruva ivedimo lauku bet kuriam eventui ivykus, na ir taip taupyti 
> koda siek tiek programoje, kad nebutu kruva eventu kur kodo viena eilute..
>
>    2. Aisku tai galima padaryti ir kitaip, pvz sukuriant po booleana 
> kiekvienam ivedimo elementui kuris tikrinasi on change ir apie save pasako 
> true ar false o kai tikrini konkretu tikrini visus kitus bool ir ziuri, 
> taip pat nieks netrukdo savo controlus sukurt nuveldant nuo esamu su tokiu 
> bool lauku :)
>
>    3. Gali sau svarbius controlus konstruktoriuje po InitializeComponent 
> susideti i kazkokia kolekcija ar kelias, kad ir List ir dirbt su jais 
> neapdirbinejant tau nereikalingu controlu kiekviena kart...
>
>
>
> "Valdas" <valdonas@super.lt> wrote in message 
> news:hq6kq9$dmk$1@trimpas.omnitel.net...
>> Didelis Aciu,  masyvas butent tai ko reikejo :)
>>
>> "VaidasB" <vaidasTrinti@pmbalticTrinti.lt> wrote in message
>> news:hq6h5j$84p$1@trimpas.omnitel.net...
>>> 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
>>>>>>>>
>>>>>>>>
>>>>>>
>>>>>>
>>>>
>>>>
>>
>> 


3Dastronomyagricultureaudioautosautos.audiautos.audioautos.binariesautos.bmwautos.clubautos.fordautos.hondacrxautos.japanautos.mercedesautos.opelautos.sportautos.volvoautos.vwaviaavia.binariesbankcardsbinariesbooksbuildingcinemacommercecomp.hardwarecomp.softwarecomp.lietuvinimascomp.networksculturedarbas.ieskaudarbas.siulaudesigneconomicselectronicsfaunafauna.aquafauna.binariesfishingflorafotofoto.binariesgamesgames.csgames.onlinegsmgurmanaihumourhumour.binariesinternetlawmicrosoftmotomusicmusic.binariesmusic.instrumentsmusic.LT.binariesnavigacijaphppoliticsprogrammingrpgsportstudyingsveikatatalktesttranslationtransportationtraveltravel.binariestvunixvideovideo.binarieswatersportswwwwww.flashpdaautos.supermama.ltmobiledarbasretro.3Dretro.agricultureretro.astronomyretro.audioretro.autosretro.autos.audiretro.autos.audioretro.autos.binariesretro.autos.bmwretro.autos.clubretro.autos.fordretro.autos.hondacrxretro.autos.japanretro.autos.mercedesretro.autos.opelretro.autos.sportretro.autos.supermamaretro.autos.supermama.ltretro.autos.volvoretro.autos.vwretro.aviaretro.avia.binariesretro.bankcardsretro.beosretro.binariesretro.booksretro.buildingretro.cinemaretro.commerceretro.compretro.comp.hardwareretro.comp.lietuvinimasretro.comp.networksretro.comp.softwareretro.cultureretro.darbasretro.darbas.ieskauretro.darbas.siulauretro.designretro.economicsretro.electronicsretro.e-vejasretro.faunaretro.fauna.aquaretro.fauna.binariesretro.fishingretro.floraretro.fotoretro.foto.binariesretro.gamesretro.games.csretro.games.onlineretro.games.rpgretro.genealogijaretro.gsmretro.gurmanairetro.humourretro.humour.binariesretro.internetretro.YZFretro.YZF.nebukretro.YZF.nebuk.netikintisretro.YZF.nebuk.netikintis.bukretro.YZF.nebuk.netikintis.buk.tikintisretro.lawretro.microsoftretro.mobileretro.motoretro.musicretro.music.binariesretro.music.instrumentsretro.music.LTretro.music.LT.binariesretro.navigacijaretro.newsretro.news.taisyklesretro.newuserretro.pdaretro.phpretro.politicsretro.programmingretro.rpgretro.sportretro.studyingretro.sveikataretro.talkretro.translationretro.transportationretro.travelretro.travel.binariesretro.tvretro.unixretro.videoretro.video.binariesretro.watersportsretro.wwwretro.www.flashdiylt.rkm.news.announcelt.rkm.news.newuser