Imports System
Imports System.IO
Imports System.Data.OleDb
Imports System.Windows.Forms.VisualStyles.VisualStyleElement.TaskbarClock
Imports System.Collections
Public Class Form1
    Dim dateiauswahl As String, modus As String, scheck1 As String, scheck2 As String, scheck3 As String, scheck4 As String
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Dim ofd As New OpenFileDialog
        CurDir = My.Application.Info.DirectoryPath
        Location = New Point(0, 0)
    End Sub
    Private Sub option1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles option1.CheckedChanged
        Text13.Text = "Option 1"
    End Sub
    Private Sub option2_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles option2.CheckedChanged
        Text13.Text = "Option 2"
    End Sub
    Private Sub option3_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles option3.CheckedChanged
        Text13.Text = "Option 3"
    End Sub
    Private Sub option4_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles option4.CheckedChanged
        Text13.Text = "Option 4"
    End Sub
    Private Sub CodeErscheinung_Click(sender As System.Object, e As System.EventArgs) Handles CodeErscheinung.Click
        Form2.Show()
    End Sub
    Private Sub Button_Click(sender As System.Object, e As System.EventArgs) Handles Button.Click
        End
    End Sub
End Class