Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim os As OperatingSystem = Environment.OSVersion
'Label9.Text = os.ToString
If My.Computer.FileSystem.DirectoryExists("D:/") = True Then
MsgBox("Der benötigte Datenträger exestiert.")
Else
MsgBox("Kann D:/ nicht finden!")
End If
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.