'DirectoryInfo' is a type in 'IO' and cannot be used as an expression

Question

I continualy recieve this error no matter what i try please try help, I'm trying to display the the directory information for a give drive

Example:

C:\ NTFS  500 000 000 Bytes

code:

Private Sub BtnCheckDestination_Click(sender As System.Object, e As System.EventArgs) Handles BtnCheckDestination.Click
    Dim hdrive As Int64
    Dim di As New IO.DirectoryInfo("H:")

    di = IO.DirectoryInfo("H:\").ToString

    TxtDestination.Text = (di).ToString

Thanks!

Answer 1

Hi,

 I you are trying to get info about a drive then you would use the DriveInfo class like this.

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim di As New IO.DriveInfo("C:\")
        Dim str As String = di.Name & "   " & di.DriveFormat & "   " & di.TotalSize & " Bytes"
        MessageBox.Show(str)
    End Sub

Answer 2

This is exactly what i'm looking for thank you so much mynonly other issue is i have a text box and i'd like for the results to be put on in the text box

Answer 3

Just replace the messagebox line with

textbox1.text =  str

'textbox1 should ofc be the name of your textbox

Answer 4

I tried that but it says value of type 'String' cannot be converted to ' System.windows.Forms.TextBox'

Answer 5

did you add the .text as in

textbox1.text = str

Answer 6

I tried that but it says value of type 'String' cannot be converted to ' System.windows.Forms.TextBox'

  This will work if you assign the string to the textbox .Text property like this.

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim di As New IO.DriveInfo("C:\")
        Dim str As String = di.Name & "   " & di.DriveFormat & "   " & di.TotalSize & " Bytes"
        TextBox1.Text = str
    End Sub