AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

documentviewer test

Browse Source
This commit is contained in:
Jonathan Jenne
2020-01-07 15:18:43 +01:00
parent bc18b693bb
commit a2cf832468
2 changed files with 8 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
GUIs.Test.DocumentViewerTest/Form1.vb
View File

@@ -12,22 +12,14 @@ Public Class Form1
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Try
Dim oKey = "0467389434974657969312056"
Dim oLogConfig As New LogConfig(LogConfig.PathType.CurrentDirectory)
Dim oSubform As New Form2(oLogConfig, oKey)
oSubform.FilePath = TextBox1.Text
oSubform.ShowDialog()
oSubform.Show()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim oKey = "0467389434974657969312056"
Dim oLogConfig As New LogConfig(LogConfig.PathType.CurrentDirectory)
oSubform = New Form2(oLogConfig, oKey)
End Sub
Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
End Sub
End Class