Monorepo/GUIs.Test.TestGUI/frmDocView.vb
2021-06-16 14:51:47 +02:00

16 lines
584 B
VB.net

Imports DigitalData.Modules.Logging
Public Class frmDocView
Private LogConfig As LogConfig
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
DocumentViewer1.LoadFile(OpenFileDialog1.FileName)
End If
End Sub
Private Sub frmDocView_Load(sender As Object, e As EventArgs) Handles Me.Load
LogConfig = New LogConfig(LogConfig.PathType.Temp)
DocumentViewer1.Init(LogConfig, "21182889975216572111813147150675976632")
End Sub
End Class