move test guis to GUIs.Test folders
This commit is contained in:
9
GUIs.Test.GUI_EDMI/frmMain.vb
Normal file
9
GUIs.Test.GUI_EDMI/frmMain.vb
Normal file
@@ -0,0 +1,9 @@
|
||||
Public Class frmMain
|
||||
Private Sub BarButtonItemEmail_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemEmail.ItemClick
|
||||
Dim frm As New frmEmailAccount
|
||||
frm = frmEmailAccount
|
||||
frm.MdiParent = Me
|
||||
frm.Show()
|
||||
frmEmailAccount.Show()
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user