Avatar billede zitzo Nybegynder
27. juli 2004 - 13:24 Der er 14 kommentarer og
1 løsning

Erklæring af array?!

Jeg er ny i VB men har kendskab til PHP og lign. Jeg vil gerne lave et array med tal, bogstaver og ord. Jeg vil helst lave det i en linie og jeg tænker at man sikkert kan fylde arrayet når man Dim'er det.

Jeg har prøvet mange forskellige ting men der er intet der lov til at blive compilet. Er der en der kan vise mig hvordan jeg laver et sådan array?

Jeg har prøvet:
Dim smallcaps() as String = {"8", "9", "0", "+", "´", "Tilbage", "Tab", "q", "w", "e"}
Dim smallcaps("9", "0", "+", "´", "Tilbage", "Tab", "q", "w", "e") as String

og mange flere kombinationer.. men ka ikke huske dem alle :)

på forhånd tak
zitzo
Avatar billede sjh Nybegynder
27. juli 2004 - 13:32 #1
Private Sub Form_Load()
Dim element  As Variant
Dim MyArray() As Variant
  MyArray = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
 
  MsgBox UBound(MyArray) ' Antal + 1 da "Mon" er 0
 
  'Gennem løb MyArray
  For Each element In MyArray
    MsgBox element
  Next
End Sub
Avatar billede zitzo Nybegynder
27. juli 2004 - 13:36 #2
fedt tak skal du have
Avatar billede sjh Nybegynder
27. juli 2004 - 13:42 #3
Du kan også gennemløbe det sådan..

Private Sub Form_Load()
Dim i As Integer
Dim MyArray() As Variant

  MyArray = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")

  For i = 0 To UBound(MyArray)
    MsgBox MyArray(i)
  Next
End Sub
Avatar billede zitzo Nybegynder
27. juli 2004 - 13:50 #4
jeg lige en spørgsmål mere. jeg har en lang række labels der hedder lbl0 til lbl57. deres caption skal være lig med de respektive punkter i array. ex.
for i = 0 to ubound(myarray)
lbli.caption = myarray(i)
next

ovenstående duer self ikke men hvordan kan jeg ellers skrive det?
Avatar billede sjh Nybegynder
27. juli 2004 - 13:56 #5
Ja du skulle nok lave dine labels om til Array.. det gør du ved at sette En Label på din Form og setter Index til 0, så skal du bare copy/paste så vil den selv lave ny index..


for i = 0 to ubound(myarray)
  lblArray(i).caption = myarray(i)
next
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:23 #6
fedest tak
Avatar billede sjh Nybegynder
27. juli 2004 - 14:25 #7
selv tak ;)
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:26 #8
jeg er får en sub or fundtion not defined fejl med lblArray(i).caption
Avatar billede sjh Nybegynder
27. juli 2004 - 14:29 #9
du skal lave lblArray til et Array, set Index til 0 og copy/paste -> lblArray 57 gange
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:32 #10
ømmm ok kan du ikke lige vise mig en enkelt af dem?
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:32 #11
eller rettere jeg er ikke sikker på at jeg forstår det der :)
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:35 #12
kan man gøre sådan her?
Dim lblArray(0 To 56) As Integer
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:36 #13
hmm nej så siger den invalid identifier..
Avatar billede sjh Nybegynder
27. juli 2004 - 14:39 #14
Avatar billede zitzo Nybegynder
27. juli 2004 - 14:45 #15
arr ok thx
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester