[ oggie @ 25.02.2008. 12:44 ] @
Imam niz bajtova deklarisan kao

dim Niz(50) as byte

zelim da ga popunim rucno

niz=(1 2 25 15 18 .....)

medjutim program mi javlja gresku External name not defined. Da li gresim u zagradama, zarezima ili sta ?

Isti problem imam za dvodimenzioni niz

dim aa (4,5) as byte

aa=(1 2 5 6 8; 4 5 5 8 9; 2 5 8 9 6 ; 8 5 2 3 6 )

Znaci nije mi problem da popunim clan po clan i da imam 50 redova koda...hteo bih to nekako u jednom redu.
[ mmix @ 25.02.2008. 13:50 ] @
viticaste zagrade i zarezi

Code:

dim Niz(50) as byte = {1, 2, 25, 15, 18, ... }

[ oggie @ 25.02.2008. 14:16 ] @
Ja napisao:


Dim niz(12) As Byte

niz={57,65,66,67,68,69,70,71,72,89,90,97}


Prijavljuje gresku syntax error.
[ mmix @ 25.02.2008. 14:36 ] @
Sorry za prvi deo, array fiksirane duzine ne moze da se inicijalizuje iz cuga, ali moze sledeca fora:

Code:

Dim niz() As Byte = {57, 65, 66, 67, 68, 69, 70, 71, 72, 89, 90, 97}
ReDim Preserve niz(12)


Ako dodeljujes niz van deklaracije, onda moras da ga instanciras kao novu referencu
Code:

Dim niz(12) As Byte 
niz = New Byte() {57, 65, 66, 67, 68, 69, 70, 71, 72, 89, 90, 97}


i btw, nizovi u VB.NET su zero based po defaultu, kad kazes niz(12) u deklaraciji to je zapravo niz od 13 elemenata (indeksi 0 do 12), mislim da je to ostavljeno zbog komatibilnosti sa vb6 programima/erima.
[ Shadowed @ 25.02.2008. 15:08 ] @
Jeste. Prvo su izbacili (ili je bilo opciono, nisam siguran) pa onda vratili tako da su napravili citavu zbrku...
[ oggie @ 26.02.2008. 10:33 ] @
Ja se izvinjavam na propustu nisam rekao da je u pitanju deo koda u VB6....

Bilo kako bilo nista nije htelo da radi, ni viticasta zagrada, ni uglasta, stalno javlja invalid karakter....na kraju sam pribegao idiotskom resenju:

dim niz () as byte

redim niz (12)

niz(0)=15
niz(1)=23
niz(2)=45
.
.
. itd....

Hvala svima, ponekad na tako banalnim stvarima izgubim vecnost....
[ Shadowed @ 26.02.2008. 10:59 ] @
Za VB6 postoji poseban forum. Premestam.
[ galahad @ 26.02.2008. 12:43 ] @
U VB6, i ne mozhe drugachije da se inicijalizuje niz, sem

Code:
element(0) = 0
element(1) = 1
...
element(n) = n


Ovo ume da bude bolno, posebno ako je neki vetji niz u pitanju, tipa lookup tabele ili slichno...
[ Shadowed @ 26.02.2008. 13:48 ] @
Napravis mali program koji ce ti generisati taj kod :)
Nesto kao:
Code:

dim elements() as integer = split(txtElements.text, ",")
dim i as integer

for i = 0 to len(elements) - 1
    txtCode.text = txtCode.text & "element(" & i & ") = " & elements(i) & vbnewline
next i
[ oggie @ 26.02.2008. 14:02 ] @
Hvala, ako ista moze da me iznervira to je kada VB ne moze da uradi neku banalnu stvar kao sto je ova.

Mali off topic, takodje sam skoro otkrio da funkcija Format u VB ne radi uvek kako ja hocu jer zavisi od Regional Settingsa !!! Pa cemu onda sluzi?
[ Aleksandar Ružičić @ 27.02.2008. 22:38 ] @
pa da formatiras text uzimajuci u obzir regionalna podesavanja :)
[ stefanpn @ 02.03.2008. 17:23 ] @
OFF TOPIC:
A ukoliko je regionalno podesavanje BiH onda mozes odmah zaboraviti na format ili izvrsiti samoubistvo.
SVIMA: AKO PISETE PROGRAM ZA NEKOG KOME JE POTREBNO REG. PODESAVANJE NA BiH, OBIJTE POSAO, SPASITE SEBI ZIVOT I ZIVCE.
[ Shadowed @ 02.03.2008. 17:35 ] @
Mozes jos nesto al' to mi zabranili da pricam... :]
[ Aleksandar Ružičić @ 02.03.2008. 17:36 ] @
lol :)
[ X Files @ 02.03.2008. 17:54 ] @

OT:
@stefanpn
Zaista postoji problem sa pristupom nekim M$ tehnologijama (recimo MDAC/ADO, ...) kada je podešeno Bosnia and Herzegovina u Regional Options-ima. Ipak, to nije razlog za odbijanje posla i glavobolju :) ... podesiš na bilo koju Latin i to je to.
[ stefanpn @ 02.03.2008. 18:11 ] @
Pa tako je na kraju i resen problem: Serbian(Latin)

Ali nigde nije pisalo da ne moze sa BiH podesavanjima, pa dok je to provaljeno...

Aj, pa ko je zabranio, daj podeli tvoje tajne sa nama...