vb.net 利用datagridview显示DB数据(复杂数据的取得和显示)

在文章/article/9609867.html 中已经介绍了datagridview直接显示数据库表的方法.

但是在实际操作中,更多的情况是需要先对显示的数据库表内容进行编辑,甚至是多个表结合之后的结果需要显示.

这时候能够将表内容的编辑结构,放到DataTable中的DataRow中,

先设定DataRow的列项目,然后在一条条的将输入导入DataRow,最后将DataRow追加到DataTable中

这样就可以实现复杂内容在datagridview中显示了

1 窗口form中追加控件datagridview

2 窗口form程序中设定:

'整理数据并显示在gridview中

Private Function editDataAndShow()

'循环用变量

Dim i As Integer

Dim j As Integer

'门店信息List

Dim storeList As New ArrayList

'人员信息List

Dim dummymanList As New ArrayList

'返回错误flag值

Dim hasErrorFlg As Boolean = False

'临时用Hashtable

Dim tmpTable As New Hashtable

'view显示用table

Dim viewTable As New Hashtable

'DataTable

Dim table As New DataTable

'datatable中使用的datarow

Dim tableRow As DataRow

Try

'取得门店信息

storeList = readDataFromDB.selectSellinStore()

'gridview中需要显示的列,都要在DataTable中先定义

'此处定义的顺序, 即gridview显示的顺序

'门店信息

table.Columns.Add("门店key")

table.Columns.Add("门店类型")

table.Columns.Add("门店ID")

table.Columns.Add("门店名称(地址)")

table.Columns.Add("地理城市")

table.Columns.Add("地理大区")

table.Columns.Add("销售归属城市")

table.Columns.Add("销售归属大区")

table.Columns.Add("销售归属公司")

table.Columns.Add("渠道")

table.Columns.Add("大客户名称")

table.Columns.Add("客户详细名称")

'门店状态

table.Columns.Add("门店状态")

'人员信息

table.Columns.Add("SR1")

table.Columns.Add("SR1销售所占百分比")

table.Columns.Add("SR2")

table.Columns.Add("SR2销售所占百分比")

table.Columns.Add("SR3")

table.Columns.Add("SR3销售所占百分比")

table.Columns.Add("SR4")

table.Columns.Add("SR4销售所占百分比")

table.Columns.Add("SR5")

table.Columns.Add("SR5销售所占百分比")

table.Columns.Add("SR6")

table.Columns.Add("SR6销售所占百分比")

table.Columns.Add("SR7")

table.Columns.Add("SR7销售所占百分比")

table.Columns.Add("SR8")

table.Columns.Add("SR8销售所占百分比")

table.Columns.Add("SR9")

table.Columns.Add("SR9销售所占百分比")

table.Columns.Add("SR10")

table.Columns.Add("SR10销售所占百分比")

table.Columns.Add("SR11")

table.Columns.Add("SR11销售所占百分比")

table.Columns.Add("SR12")

table.Columns.Add("SR12销售所占百分比")

table.Columns.Add("SR13")

table.Columns.Add("SR13销售所占百分比")

table.Columns.Add("SR14")

table.Columns.Add("SR14销售所占百分比")

table.Columns.Add("SR15")

table.Columns.Add("SR15销售所占百分比")

table.Columns.Add("KAM")

table.Columns.Add("DSM")

'SR是否拆分

table.Columns.Add("SR拆分区分")

For i = 0 To storeList.Count - 1 Step 1

'清空Hashtable

tmpTable.Clear()

viewTable.Clear()

'将门店信息保存在table中,以便gridview显示

tableRow = table.NewRow

tableRow("门店key") = CType(storeList.Item(i), SellinStoreBean).storeKey.Trim

tableRow("门店类型") = CType(storeList.Item(i), SellinStoreBean).storeType.Trim

tableRow("门店ID") = CType(storeList.Item(i), SellinStoreBean).storeID.Trim

tableRow("门店名称(地址)") = CType(storeList.Item(i), SellinStoreBean).storeName.Trim

tableRow("地理城市") = CType(storeList.Item(i), SellinStoreBean).geoCity.Trim

tableRow("地理大区") = CType(storeList.Item(i), SellinStoreBean).geoRegion.Trim

tableRow("销售归属城市") = CType(storeList.Item(i), SellinStoreBean).salesCity.Trim

tableRow("销售归属大区") = CType(storeList.Item(i), SellinStoreBean).salesRegion.Trim

tableRow("销售归属公司") = CType(storeList.Item(i), SellinStoreBean).salesCompany.Trim

tableRow("渠道") = CType(storeList.Item(i), SellinStoreBean).channel.Trim

tableRow("大客户名称") = CType(storeList.Item(i), SellinStoreBean).cTotalName.Trim

tableRow("客户详细名称") = CType(storeList.Item(i), SellinStoreBean).cDetailName.Trim

tableRow("门店状态") = CType(storeList.Item(i), SellinStoreBean).status.Trim

'取得DSM

tmpTable.Add("storeKey", CType(storeList.Item(i), SellinStoreBean).storeKey.Trim)

tmpTable.Add("positionLevel", Constant.DUMMYMAN_POSITION_DSM)

tmpTable.Add("type", Constant.RELATION_TYPE_SELLIN)

dummymanList = readDataFromDB.selectSellinRelationByLevel(tmpTable)

'将DSM信息保存在table中,以便gridview显示(因为人员变动,DSM有可能为空,所以要追加判断)

If dummymanList.Count <> 0 Then

tableRow("DSM") = CType(dummymanList.Item(0), Object)(0).ToString.Trim

End If

'清空Hashtable

tmpTable.Clear()

dummymanList.Clear()

'取得KAM

tmpTable.Add("storeKey", CType(storeList.Item(i), SellinStoreBean).storeKey.Trim)

tmpTable.Add("positionLevel", Constant.DUMMYMAN_POSITION_KAM)

tmpTable.Add("type", Constant.RELATION_TYPE_SELLIN)

dummymanList = readDataFromDB.selectSellinRelationByLevel(tmpTable)

'将KAM信息保存在table中,以便gridview显示(因为KAM有可能为空,所以要追加判断)

If dummymanList.Count <> 0 Then

tableRow("KAM") = CType(dummymanList.Item(0), Object)(0).ToString.Trim

End If

'清空Hashtable

tmpTable.Clear()

dummymanList.Clear()

'取得SR

tmpTable.Add("storeKey", CType(storeList.Item(i), SellinStoreBean).storeKey.Trim)

tmpTable.Add("positionLevel", Constant.DUMMYMAN_POSITION_SR)

tmpTable.Add("type", Constant.RELATION_TYPE_SELLIN)

dummymanList = readDataFromDB.selectSellinRelationByLevel(tmpTable)

'将SR信息保存在table中,以便gridview显示

For j = 0 To dummymanList.Count - 1 Step 1

tableRow("SR" & j + 1) = CType(dummymanList.Item(j), Object)(0).ToString.Trim

tableRow("SR" & j + 1 & "销售所占百分比") = CType(dummymanList.Item(j), Object)(1).ToString.Trim

Next j

If dummymanList.Count > 1 Then

tableRow("SR拆分区分") = Constant.SR_SPLIT_YES

Else

tableRow("SR拆分区分") = Constant.SR_SPLIT_NO

End If

'将数据行保存到table中

table.Rows.Add(tableRow)

Next i

'设定datagridview的数据源

Me.DataGridView1.DataSource = table

'隐藏行头

Me.DataGridView1.RowHeadersVisible = False

'返回错误flag值

Return hasErrorFlg

Catch ex As Exception

MsgBox("更新数据库处理 editDataForUpdate()出错: " & ex.Message)

Return True

End Try

End Function