[Sample program (Form 1.vb)]
Option Strict Off
Option Explicit ON
Imports System
Imports System.Text
Imports System.Net
Friend Class Form1
Inherits System. Windows. Forms. Form
#Region "Windows Form Designer generated code"
Public Sub New()
MyBase.New()
If m_vb6FormDefInstance Is Nothing Then
If m_InitializingDefInstance Then
m_vb6FormDefInstance = Me
Else
Try
‘For the start-up form, the first instance created is the default instance.
If System. Reflection. Assembly. GetExecutingAssembly. EntryPoint
.DeclaringType Is Me.GetType Then
m_vb6FormDefInstance = Me
EndIf
Catch
End Try
End If
End If
‘ This call is required by the Windows form designer.
InitializeComponent()
End Sub
To Next Page
Loading...
