' Set the length in bytes of the input file' Example:' Dim filePath As String = "c: est.txt"' MessageBox.Show("Original length: " & New System.IO.FileInfo(filePath)' .Length)' SetFileLength(filePath, 50000)' MessageBox.Show("New length: " & New System.IO.FileInfo(filePath).Length)Sub SetFileLength(ByVal filePath As String, ByVal sizeInBytes As Long) Dim fs As System.IO.FileStream Try fs = New System.IO.FileStream(filePath, IO.FileMode.Open) fs.SetLength(sizeInBytes) Finally If Not fs Is Nothing Then fs.Close() End TryEnd Sub

Why the World Needs More Technology Leadership
As a fact, technology has touched every single aspect of our lives. And there are some technology giants in today’s world which have been frequently opined to have a strong influence on recent overall technological influence. Moreover, those tech giants have popular technology leaders leading the companies toward achieving greatness.