Get File Size

     Dim fileDetail As IO.FileInfo

           fileDetail = My.Computer.FileSystem.GetFileInfo(Application.StartupPath + "\FILE.LOG")

           If fileDetail.Length < 1500 Then '1500 bytes
                'code here
           End If