Demetrio Cassarino
25 lines
505 B
VB.net
25 lines
505 B
VB.net
Imports System.Windows.Forms
|
|
|
|
Public Class SaveAsStrategyV
|
|
|
|
#Region "FIELDS & PROPERTIES"
|
|
|
|
Private WithEvents m_SaveAsStrategyVM As SaveAsStrategyVM
|
|
|
|
#End Region ' Fields & Properties
|
|
|
|
#Region "EVENTS"
|
|
|
|
Private Sub Load() Handles Me.Loaded
|
|
m_SaveAsStrategyVM = Me.DataContext
|
|
End Sub
|
|
|
|
Private Sub CloseWindow(DialogResult As DialogResult) Handles m_SaveAsStrategyVM.m_CloseWindow
|
|
Me.DialogResult = DialogResult
|
|
Me.Close()
|
|
End Sub
|
|
|
|
#End Region ' Events
|
|
|
|
End Class
|