How to get file size with is selected in open file dialog

Question

1.00/5 (1 vote)

See more:

Hi .I am working on a program in visual basic .I want that when i select a file in open file dialog its size (mb) to show in label.I have worked a lot but it always shows error
I need a quick help

What I have tried:

VB

If dlg.showdialog =dialog result .ok then
  Panel1.visible = true
  Label1.visible = false
  lbl_size.visble=true
  lbl_size.text=  dlg.filesize
End if

Posted 16-Jun-20 18:34pm

Member 14839888

Updated 17-Jun-20 3:17am

Maciej Los

v2

Add a Solution

2 solutions

Solution 2

I worked a more and found a good solution myself
Here it is:

Dim filename As String = dlg.FileName
        Dim fi As New IO.FileInfo(filename)
        Dim exists As Boolean = fi.Exists
        If fi.Exists Then
            Console.WriteLine("File Exists")
        End If
        Dim size As Long = fi.Length
        Dim dormat As String = fi.Extension
        Console.WriteLine("File Size in Bytes:{0}", size)
        Console.ReadLine()
        Label9.Text = (size / 1024) & " KB"

Posted 17-Jun-20 3:17am

Member 14839888

Comments

Maciej Los 17-Jun-20 9:30am

Yeah, you did it "yourself" without someone's help.

Richard MacCutchan 17-Jun-20 10:34am

Yes, and there is some complex mathematics on the last line.

Maciej Los 18-Jun-20 1:59am

:laugh:

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Maciej Los · Accepted Answer · 2020-06-16T20:04:00

Solution 1

If you're using OpenFileDialog Class (System.Windows.Forms)[^], then this class does NOT have FileSize property.

Use FileInfo(String) Constructor (System.IO)[^] to get file properties, details.

VB

Dim fi As FileInfo = New FileInfo(flg.FileName)
lbl_size.text = fi.Length

Posted 16-Jun-20 20:04pm

Maciej Los

Updated 16-Jun-20 20:07pm

v2

Comments

CPallini 17-Jun-20 2:21am

5.

Maciej Los 17-Jun-20 2:27am

Thank you, Carlo.

Member 14839888 17-Jun-20 9:13am

Thanks .I got it . it works good

[no name] 22-Jun-20 13:21pm

+5

Maciej Los 22-Jun-20 13:39pm

Thank you, Bruno.