"Mads Chr. Olesen" <MadsChrO@Yahoo.com> wrote in message
news:3c1cc688$0$25413$edfadb0f@dspool01.news.tele.dk...
> Hej gruppe!
>
> Jeg prøver at lave en reference til et element i et array, sådan
her:
> ---CODE START---
> Option Explicit
>
> Private Sub Command1_Click()
> Dim a(1 To 2) As String
> Dim b
> a(2) = "test1"
> Set b = a(2)
> MsgBox b
> End Sub
> ---CODE END---
>
> Er der virkelig ikke en måde hvorpå man kan gøre det?
>
> Hilsen
> Mads Chr. Olesen
> MadsChrO@Yahoo.com
Hej Mads
Prøv med følgende:
Private Sub Command1_Click()
Dim a(1 To 2) As String
Dim b As String
a(2) = "test1"
b = a(2)
MsgBox b
End Sub
Problemet er
> Set b = a(2)
Du skal kun bruge Set når du arbejder med objektreferencer og
String er ikke en objektreference.
Hvis det var en objektreference skulle du også ha' skrevet
....
Set a(2) = ...
Håber du kan bruge det til noget
--
Mikkel Bundgaard
IT University of Copenhagen
http://officehelp.gone.dk
Codito, Ergo Sum