Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim checkThisFile As New FileInfo("C:\Users\1UP\Documents\test.txt")
Dim getFilesize As Long = checkThisFile.Length
Me.Text = getFilesize.ToString
End Sub
End Class
Copyright © 2024, NextGenUpdate.
All Rights Reserved.