vb中如何獲取datagrid選中行的值？

先說明datagrid的壹些屬性，說清楚了，自然解決方法就明了了。

說明：

Bookmark：設置或返回當前的行標簽號

DataGrid1.Columns("ProductID").CellText(DataGrid1.Bookmark)

返回當前行中字段為‘ProductID’的值。

在

DataGrid

被連接到壹個數據庫後，可能想要監視用戶單擊了哪壹個單元。可以使用

RowColChange

事件——而不是

Click

事件。

如；

Private

Sub

DataGrid1_RowColChange(LastRow

As

Variant,

ByVal

LastCol

As

Integer)

Debug.Print

_DataGrid1.Columns("ProductID").CellValue(DataGrid1.Bookmark)

End

Sub

通過這個方法就能獲得用戶點擊的行的某個值。

利用壹下方法可以控制datagrid每列的寬度；

Dim

c

As

Column

Set

c

=

DataGrid1.Columns.Add(DataGrid1.Columns.Count)

With

c

.Visible

=

True

.Width

=

1000

.Caption

=

"我的新列"

.DataField

=

Adodc1.Recordset.Fields("ProductName").Name

.Alignment

=

dbgRight

End

With

下面的代碼將刪除被單擊的列。

Private

Sub

DataGrid1_HeadClick(ByVal

ColIndex

As

Integer)

DataGrid1.Columns.Remove

ColIndex

End

Sub

上一篇:文旅部為何提醒大家說暫時不要前往捷克旅遊？

下一篇:最愛的五個治愈系日劇