koodi tallentaa HOMMA nimisen resurssin
HOMMA.FILU nimiseen tiedostoon
Dim nostin As New IO.FileStream("HOMMA.FILU", IO.FileMode.Create)
HOMMA.Write(My.Resources.HOMMA, 0, _
My.Resources.HOMMA.Length)
HOMMA.Flush() 'en ole varma flushista, mutta laitoin sen
HOMMA.Close() 'debuggaus vaiheessa ja seuraavassa debugissa
'koodissa ei tullut valituksiaAihe on jo aika vanha, joten et voi enää vastata siihen.