Ho passato il valore 1 che corrisponde a vbResIcon.
Il codice che ho scritto è il seguente:
Private Const ICO_CH = 2001
'--------------
Private Sub MDIForm_Load()
Set Me.Icon = LoadResPicture(ICO_CH, 1)
End Sub
Nel file .rc che poi traformo in .res ho scritto:
2001 ICON LOADONCALL MOVEABLE "Chiudi.ico"
2002 ICON LOADONCALL MOVEABLE "Apri.ico"
Ho sbagliato qualcosa?