Ciao.
In modo più vicino al .NET puoi fare:
	codice:
	Dim PercorsoProgrammi As String = Environment.GetFolderPath(Environment.SpecialFolder.ProgramFiles)
 
Per l'architettura, invece, puoi fare:
	codice:
	Dim A32bit As Boolean = False
If Environment.GetEnvironmentVariable("PROCESSOR_ARCHITECTURE").Contains("86") Then
       A32bit = True
Else
       A32bit = False
End If
 
Per il cursore, invece, ti basta mettere questo codice nell'evento Load del tuo form (credo):
	codice:
	 
Me.Cursor = New Windows.Forms.Cursor("Percorso cursore")
 
  
  