Search column name in tables in SQL Database

select
sc.name as col_name,so.name as table_name from syscolumns sc inner join sysobjects so on so.id=sc.id where sc.name like 'column_name' and so.xtype='U'

To convert any date filed with time to date without time like 1-Jan-2012 00:00:00.00

update TableName set Datefield=cast(convert(varchar,datefield,106) as datetime)

Save VsFlexGrid data to excel

1. Private Sub FlexToExcel()
2. Dim xlObject    As Excel.Application
3. Dim xlWB        As Excel.Workbook
4.        
5.     Set xlObject = New Excel.Application
7.     'This Adds a new woorkbook, you could open the workbook from file also
8.     Set xlWB = xlObject.Workbooks.Add
9.                
10.     Clipboard.Clear 'Clear the Clipboard
11.     With MSFlexGrid1
12.         'Select Full Contents (You could also select partial content)
13.         .Col = 0               'From first column
14.         .Row = 0               'From first Row (header)
15.         .ColSel = .Cols - 1    'Select all columns
16.         .RowSel = .Rows - 1    'Select all rows
17.         Clipboard.SetText .Clip 'Send to Clipboard
18.     End With
19.            
20.     With xlObject.ActiveWorkbook.ActiveSheet
21.         .Range("A1").Select 'Select Cell A1 (will paste from here, to different cells)
22.         .Paste              'Paste clipboard contents
23.     End With
24.    
25.     ' This makes Excel visible
26.     xlObject.Visible = True
27. End Sub

Binding Combobox at run time without using database connection via Dictionery Objec

        Dim objDict As New Dictionary(Of String, String)
        objDict.Add("1", "Value 1")
        objDict.Add("2", "Value 2")


        ComboBox1.DataSource = New BindingSource(objDict, Nothing)
        ComboBox1.DisplayMember = "Value"
        ComboBox1.ValueMember = "Key"