|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
'prepare the connection properties' Dim con As SqlConnection Dim cmd As SqlCommand Dim myDA As SqlDataAdapter Dim myDataSet As DataSet 'prepare your connection string' con = New SqlConnection("Data Source=.SQLEXPRESS;AttachDbFilename=c:usersed-carlosdocumentsvisual studio 2010ProjectssavesaveInfo.mdf;Integrated Security=True;User Instance=True") con.Open() 'now you can laod data into the combobox' cmd = New SqlCommand("Select * FROM Details", con) If con.State = ConnectionState.Closed Then con.Open() myDA = New SqlDataAdapter(cmd) myDataSet = New DataSet() myDA.Fill(myDataSet) DataGridView1.DataSource = myDataSet.Tables(0).DefaultView 'to inimize the column of a grid' Dim dv As DataGridViewColumn = DataGridView1.Columns(3) dv.Width = 40 |
Leave a comment