Datagrid使用颜色VB.NET导入excel单元格 [英] Datagrid import excel cells with color VB.NET
本文介绍了Datagrid使用颜色VB.NET导入excel单元格的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我在这里需要帮助,我有datagrid视图,我在datagrid中导入excel值,但我看不到单元格的颜色,这里是我的代码和图片。我怎样才能传递颜色。
I need help here, I have datagrid view and I import excel values in datagrid, but I cannot see back colors of cells, here is my code and Picture . how can I also pass colors.
Dim cmb As New DataGridViewComboBoxColumn()
cmb.HeaderText = "Colum1"
cmb.Name = "cmb"
cmb.Items.Add("Select for Main Plot")
cmb.Items.Add("Select")
DataGridView1.Columns.Add(cmb)
Dim conn As OleDbConnection
Dim dta As OleDbDataAdapter
Dim dts As DataSet
Dim excel As String
Dim OpenFileDialog As New OpenFileDialog
OpenFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments
OpenFileDialog.Filter = "All Files (*.*)|*.*|Excel files (*.xlsx)|*.xlsx|CSV Files (*.csv)|*.csv|XLS Files (*.xls)|*xls"
If (OpenFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then
End If
Dim fi As New FileInfo(OpenFileDialog.FileName)
Dim FileName As String = OpenFileDialog.FileName
excel = fi.FullName
conn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + excel + ";Extended Properties=Excel 12.0;")
dta = New OleDbDataAdapter("Select * From [Sayfa1$]", conn)
dts = New DataSet
dta.Fill(dts, "[Sayfa1$]")
DataGridView1.DataSource = dts
DataGridView1.DataMember = "[Sayfa1$]"
conn.Close()
我尝试了什么:
我不知道应该怎么做我做。也许这是不可能的,但我需要学习
What I have tried:
I do not have any idea what should I do. Maybe it is not possible but ı need to learn
推荐答案
,conn)
dts = 新 DataSet
dta.Fill(dts, [Sayfa1
", conn) dts = New DataSet dta.Fill(dts, "[Sayfa1
)
DataGridView1.DataSource = dts
DataGridView1.DataMember = [Sayfa1
") DataGridView1.DataSource = dts DataGridView1.DataMember = "[Sayfa1
conn.Close()
" conn.Close()
我尝试了什么:
我不知道该怎么办。也许不是可能,但需要学习
What I have tried:
I do not have any idea what should I do. Maybe it is not possible but ı need to learn
这篇关于Datagrid使用颜色VB.NET导入excel单元格的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文