Hi,
ich möchte gerne ein Array mit ein par Informationen füllen.
Anbei mal mein Code :
Es fehlermeldung erscheint folgender Text :
"Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt."
Markiert wird folgende Zeile :
"VZInfo(i).Format = dr.DriveFormat"
wäre nett wenn mir jemand helfen kann.
mfg
ich möchte gerne ein Array mit ein par Informationen füllen.
Anbei mal mein Code :
VB.NET-Quellcode
- Imports System
- Imports System.IO
- Public Class Form1
- Dim VZInfo() As VerzeichnisInfo
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim i As Integer = 0
- For Each dr As System.IO.DriveInfo In My.Computer.FileSystem.Drives
- If (dr.DriveFormat = "FAT32") Or (dr.DriveFormat = "NTFS") Then
- VZInfo(i).Format = dr.DriveFormat
- VZInfo(i).RootDirectory = dr.RootDirectory.Name
- VZInfo(i).Typ = dr.DriveType
- VZInfo(i).VolumeLabel = dr.VolumeLabel
- i = i + 1
- End If
- Next
- i = 0
- End Sub
- Structure VerzeichnisInfo
- Public Format As String
- Public Typ As String
- Public VolumeLabel As String
- Public RootDirectory As String
- End Structure
- End Class
Es fehlermeldung erscheint folgender Text :
"Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt."
Markiert wird folgende Zeile :
"VZInfo(i).Format = dr.DriveFormat"
wäre nett wenn mir jemand helfen kann.
mfg