Hur gör man för att konvertera en integer till 1 dimentionell single?

dim myInteger as integer

dim mySingle() as single


hur sätta mySingle() = myInteger ??

Till att börja med måste du ange storleken på arrayen:
dim mySingle(25) as single

Sedan:
mySingle(x)=myInteger

Får bara meddelandet : Value of type 'Integer' cannot be converted to '1-dimensional array of Single'.

Om man hårdskriv så fungerar det : dim mySingle() as single = {200}

Dim foo As Integer
Dim bar(25) As Single

bar(0) = Convert.ToSingle(foo)
bar(1) = foo * 0.25

...eller

dim myinteger as integer = 25
dim mySingle() as single = {myinteger}