Visual Basic

While drgetcusfile.Read()
           Dim count As Integer = fieldnostart
           Dim rowcount As Integer = 0
           grid.Columns.Add("Property", "Property")
           grid.Columns.Add("Value", "Value")
           While count <= fieldnoend
               grid.Rows.Add()
               grid.Item(0, rowcount).Value = rows(rowcount)
               grid.Item(1, rowcount).Value = drgetcusfile.Item(count)

               count += 1
               rowcount += 1
           End While

While count <= fieldnoend
  grid.Rows.Add()
  grid.Item(0, rowcount).Value = rows(rowcount)
  if drgetcustfile.Item(count).GetType.ToString = "System.DateTime" Then
    grid.Item(1, rowcount).Value = Format(drgetcusfile.Item(count),"short date")
  Else
    grid.Item(1, rowcount).Value = drgetcusfile.Item(count)
  End If
End While

While count <= fieldnoend
                grid.Rows.Add()
                grid.Item(0, rowcount).Value = rows(rowcount)
                Try
                    grid.Item(1, rowcount).Value = drgetcusfile.GetString(count)
                    grid.Item(1, rowcount).Value = DateTime.ParseExact(grid.Item(1, rowcount).Value, "yyyy-MM-dd", Nothing).ToShortDateString()
                Catch ex As Exception
                End Try
                count += 1
                rowcount += 1
            End While

grid.Columns(0).DefaultCellStyle.Format = "dd/MM/yyyy"

grid.Item(1, rowcount).Value = drgetcusfile.Item(count)
               If grid.Item(1, rowcount).Value.GetType.Equals(GetType(Date)) Then
                   grid.Item(1, rowcount).Style.Format = "dd/MM/yyyy"
               End If

private void Form1_Load(object sender, EventArgs e)

        {

            DataTable datatable = new DataTable();

            datatable.Columns.Add("col1",typeof(DateTime));

            datatable.Columns.Add("col2", typeof(DateTime));

            datatable.Rows.Add(DateTime.Parse("2007/12/31 5:00:11 PM"), DateTime.Parse("2008/01/01 6:00:12 AM"));

 

            datatable.Rows.Add(DateTime.Parse("2007/4/4 1:00:13 AM"), DateTime.Parse("2007/8/8 3:00:14 PM"));

 

            dataGridView1.DataSource = datatable;

 

            dataGridView1.Columns[0].DefaultCellStyle.Format = "dd'/'MM'/'yyyy";

            //Get 13/12/2007

            dataGridView1.Columns[1].DefaultCellStyle.Format = "dd'/'MM'/'yyyy hh:mm:ss tt";

            //Get 13/12/2007 5:00:11 PM

        }

dgv.Columns[columnNumber].DefaultCellStyle.Format="dd MMM yyyy";

If Not OpenForm Is Nothing Then
    'Do Work Here
Else
    OpenForm.Close
End If

nlarson11 wrote:

I realize this isn't directly related to VB

nlarson11 wrote:

nlarson11 has posted a reply to your message at "Visual Basic":

Hey Rich,

I feel like such and ass inconveniencing you where you had to waste your time reading my misplaced question. May you be on the receiving end of your attitude when you need help.

Thanks again.