Problemer med array

Hej Eksperter

Jeg er ved at skrive noget kode om fra VB til VB.NET, og er løbet ind i følgende problem

Her er koden i VB

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & server & "\root\cimv2")
Set colInstalledPrinters = objWMIService.ExecQuery("Select * from Win32_PrinterDriver")
For Each objPrinter In colInstalledPrinters
    fields() = Split(objPrinter.Name, ",")
    Ark8.Range(kolonne & antal1).Value = fields(0)
    antal1 = antal1 + 1
Next

Det er så de 2 linier her der driller

fields() = Split(objPrinter.Name, ",")
Ark8.Range(kolonne & antal1).Value = fields(0)

Dette får jeg så ikke lov til i VB.NET

Er der nogen der har en ide til hvad jeg gør forkert. Den kan ikke lide "fields()"

Har i behov for mere info, så spørg endeligt