Visual Basic

Imports System.IO

   Dim strFileSize As String = ""
   Dim di As New IO.DirectoryInfo("C:\temp")
   Dim aryFi As IO.FileInfo() = di.GetFiles("*.txt")
   Dim fi As IO.FileInfo

   For Each fi In aryFi
       strFileSize = (Math.Round(fi.Length / 1024)).ToString()
       Console.WriteLine("File Name: {0}", fi.Name)
       Console.WriteLine("File Full Name: {0}", fi.FullName)
       Console.WriteLine("File Size (KB): {0}", strFileSize )
       Console.WriteLine("File Extension: {0}", fi.Extension)
       Console.WriteLine("Last Accessed: {0}", fi.LastAccessTime)
       Console.WriteLine("Read Only: {0}", (fi.Attributes.ReadOnly = True).ToString)
   Next

Dim dgv As DataGridView = Me.DataGridView1

dgv.RowHeadersVisible = False

'Add some rows
For i As Integer = 0 To 10
    dgv.Rows.Add()
Next

'Set each row height
For Each row As DataGridViewRow In dgv.Rows
    'Set the row height
    row.Height = (row.Index * 10) + 10

    'Add the height value to the 1st cell
    row.Cells(0).Value = row.Height

Next

Paramu1973 wrote:

learned many things from you