Program

Program.cs

using System;
using System.Collections.Generic;
using System.Windows.Forms;
using ESRI.ArcGIS;

namespace GlobeControlApp
{
    static class Program
    {
        /// <summary>
        /// The main entry point for the application.
        /// </summary>
        [STAThread]
        static void Main()
        {
            Application.EnableVisualStyles();
            Application.SetCompatibleTextRenderingDefault(false);
            RuntimeManager.Bind(ProductCode.Engine);
            Application.Run(new MainForm());

            // Workaround for crash on exit bug.
            ESRI.ArcGIS.DefenseSolutions.IMoleCoreHelper mch = new ESRI.ArcGIS.DefenseSolutions.MoleCoreHelperClass();
            mch.ReleaseForceElementRenderer();
            mch.ReleaseTacticalGraphicRenderers();

            // release any COM objects that are still hanging
            ESRI.ArcGIS.ADF.COMSupport.AOUninitialize.Shutdown();

        }
    }
}

Program.vb

Imports System
Imports System.Collections.Generic
Imports System.Windows.Forms

Namespace GlobeControlApp
	NotInheritable Class Program
		Private Sub New()
		End Sub
		''' <summary>
		''' The main entry point for the application.
		''' </summary>
		<STAThread()> _
		Private Shared Sub Main()
			Application.EnableVisualStyles()
			Application.SetCompatibleTextRenderingDefault(False)
			Application.Run(New MainForm())

            ' Workaround for crash on exit bug.
            Dim mch As ESRI.ArcGIS.DefenseSolutions.IMoleCoreHelper = New ESRI.ArcGIS.DefenseSolutions.MoleCoreHelperClass()
			mch.ReleaseForceElementRenderer()
			mch.ReleaseTacticalGraphicRenderers()

			' release any COM objects that are still hanging
			ESRI.ArcGIS.ADF.COMSupport.AOUninitialize.Shutdown()

		End Sub
	End Class
End Namespace