投稿者 社会人  (社会人) 投稿日時 2014/7/1 11:08:12

※入力制限で二つに分けて書き込みします。

▼Application.Designer.vb▼
'------------------------------------------------------------------------------ 
' <auto-generated> 
'     このコードはツールによって生成されました。 
'     ランタイム バージョン:4.3039. 

'     このファイルへの変更は、以下の状況下で不正な動作の原因になったり、 
'     コードが再生成されるときに損失したりします。 
' </auto-generated> 
'------------------------------------------------------------------------------ 

Option Strict On
Option Explicit On

Namespace My
    
    'メモ: このファイルは自動生成されました。直接変更しないでください。変更したり、 
    ' ビルド エラーが発生した場合は、プロジェクト デザイナー へ移動し (プロジェクト 
    ' プロパティに移動するか、またはソリューション エクスプローラーのマイ プロジェクト 
    ' ノード上でダブルクリック)、アプリケーション タブ上で変更を行います。 
    
    Partial Friend Class MyApplication
        
        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Public Sub New()
            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
            Me.IsSingleInstance = false
            Me.EnableVisualStyles = true
            Me.SaveMySettingsOnExit = true
            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
        End Sub
        
        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Protected Overrides Sub OnCreateMainForm()
            Me.MainForm = Global.Login.FMBase 'Global.Login.FMBaseで「FMBaseはLogin型です。式として使用することはできません。」 
        End Sub
    End Class
End Namespace