Avatar billede fojensen Nybegynder
13. juni 2012 - 21:20 Der er 6 kommentarer og
1 løsning

Sammensætte varibelnavn med løkke

Jeg skal behandle 3 variabler, der kommer fra en Userform:
TextBoxBelob1.Value, TextBoxBelob2.Value, og TextBoxBelob3.Value.

Nu vil jeg gerne løbe de tre variabler igennem, og se hvilken værdi der kommer fra dem...

Jeg har forsøgt med en for-løkke i nedenstående kode, men variablen TextBoxBelob1.Value kan åbenbart ikke kaldes med 'TextBoxBelob & i.Value', selvom i = 1.

Hvordan gør jeg så ?

-----kode-----
Dim Belob As Integer
For i = 1 To 3
Belob = TextBoxBelob & i.Value
MsgBox Belob
Next i
-----/kode-----
Avatar billede finb Ekspert
13. juni 2012 - 21:28 #1
Gåseøjne om TextBoxBelob >>> "TextBoxBelob" ?
Mvh finb
Avatar billede fojensen Nybegynder
13. juni 2012 - 21:43 #2
Selv om jeg sætter gåseøjne omkring den første del af variablens navn, (altså Belob = "TextBoxBelob" & i.Value), så siger den altså stadigvæk: Object required
Avatar billede store-morten Ekspert
13. juni 2012 - 22:24 #3
Dim Belob As Integer
For i = 1 To 3
Belob = TextBoxBelob & i
MsgBox Belob
Next i
Avatar billede fojensen Nybegynder
13. juni 2012 - 22:52 #4
Det er selvfølgelig et forsøg Store-Morten, men jeg opnår ikke det ønskede...

Den kører løkken og svarer med 3 x MsgBox: først 1, så 2, og så 3. Altså kun væreierne der kommer fra i.
Avatar billede supertekst Ekspert
13. juni 2012 - 23:20 #5
Sub test()
Dim Belob As Integer, cc As Object
    For i = 1 To 3
        Set cc = Me.Controls("Textbox" & CStr(i))
        Belob = cc.Value
        MsgBox Belob
    Next i
End Sub
Avatar billede fojensen Nybegynder
14. juni 2012 - 05:55 #6
Ja. Supertekst.
Det ser da ud til at løse problemet.
Skal lige teste færdig når jeg er hjemme fra arbejdet igen.

Det bliver vist sen i dagt, så jeg ved ikke engang om jeg når mere af det i dag.

under en hurtig test, måtte jeg ændre koden lidt til:
Dim Belob As Integer, cc As Object
    For i = 1 To 3
        Set cc = Me.Controls("TextBoxBelob" & CStr(i))
        Belob = cc.Value
        MsgBox Belob
    Next i
...og denne test faldt heldigt ud.
Avatar billede supertekst Ekspert
14. juni 2012 - 08:38 #7
ok - jeg venter..
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

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



IT-JOB

Udviklings- og Forenklingsstyrelsen

Senior IT-projektleder til modernisering af Moms domænet

OptikIT A/S

Junior C#-udvikler

Akademikernes A-kasse

IT-supporter med teknisk flair

Udviklings- og Forenklingsstyrelsen

Ny kollega til porteføljestyring og rapportering

Udviklings- og Forenklingsstyrelsen

Test Manager med agilt mindset
Seneste spørgsmål Seneste aktivitet
29 min siden opkaldside Af hagbartm i Mobiltelefoner
I dag 16:05 win 10 vil ikke boote Af bb69 i Windows
I dag 11:20 Lenovo x390 Af tobberjas i PC
I dag 10:14 Alder i Excel Af Nanarsi i Excel
I dag 09:00 Flere linier på faneblad Af Peder Lund Nielsen i Excel