如何在vb.net中的DataGrid中增加一空白行

VS中的DataGridView控件，在機(jī)房重構(gòu)里的出鏡率還是很高噠~這篇博客就把一些有關(guān)DataGridView

為赤峰等地區(qū)用戶提供了全套網(wǎng)頁(yè)設(shè)計(jì)制作服務(wù)，及赤峰網(wǎng)站建設(shè)行業(yè)解決方案。主營(yíng)業(yè)務(wù)為成都網(wǎng)站制作、網(wǎng)站建設(shè)、外貿(mào)網(wǎng)站建設(shè)、赤峰網(wǎng)站設(shè)計(jì)，以傳統(tǒng)方式定制建設(shè)網(wǎng)站，并提供域名空間備案等一條龍服務(wù)，秉承以專業(yè)、用心的態(tài)度為用戶提供真誠(chéng)的服務(wù)。我們深信只要達(dá)到每一位用戶的要求，就會(huì)得到認(rèn)可，從而選擇與我們長(zhǎng)期合作。這樣，我們也可以走得更遠(yuǎn)！

控件的一些使用細(xì)節(jié)和大家分享一下！

找到控件：

? ? ? ? ? ? ? ??

綁定數(shù)據(jù)源

選中行數(shù)代碼實(shí)現(xiàn)：

DataGridView1.SelectedRows.Count

以增加刪除用戶窗體中的刪除所選行數(shù)代碼為例：

[vb]?view plain?copy

Private?Sub?btnDeleteUser_Click(sender?As?Object,?e?As?EventArgs)?Handles?btnDeleteUser.Click

'判斷下拉表中是否選擇了用戶類型

If?cmbUserLevel.SelectedItem?=?""?Then

MsgBox("如需刪除用戶，請(qǐng)先選擇用戶類型！",?MessageBoxButtons.OK,?MessageBoxIcon.Exclamation)

End?If

Dim?K?As?Integer?=?DataGridView1.SelectedRows.Count

Dim?FFacade?As?New?Facade.DeleteUserFacade

Dim?Uuser?As?New?Entity.AddDeleteUserInfo

Dim?strResult?As?Boolean

'strResult?=?FFacade.DeleteUserinfo(Uuser)

If?DataGridView1.SelectedRows.Count??0?Then?'如果選中的行數(shù)大于0

For?i?As?Integer?=?K?To?1?Step?-1

'獲取控件的第N行的第一列數(shù)據(jù)，得到用戶ID，以用戶ID為主鍵來(lái)刪除整行數(shù)據(jù)

Dim?userinfo?As?String?=?DataGridView1.SelectedRows(i?-?1).Cells("UserID").Value.ToString

'刪除的數(shù)據(jù)不能為當(dāng)前登錄的用戶，需要判斷用戶ID

If?Entity.Share.ID.Trim?=?userinfo?Then

MsgBox("您無(wú)法刪除當(dāng)前登錄的用戶！",?MessageBoxButtons.OK,?MessageBoxIcon.Exclamation)

Else

Uuser.UserID?=?userinfo

End?If

strResult?=?FFacade.DeleteUserinfo(Uuser)

'If?FFacade.DeleteUserinfo(Uuser)?Then

If?strResult?=?True?Then

'刪除選中行

DataGridView1.Rows.RemoveAt(DataGridView1.SelectedRows(i?-?1).Index)

MsgBox("數(shù)據(jù)刪除成功！",?MessageBoxButtons.OK,?MessageBoxIcon.Information)

End?If

Next

Else?'如果選中的行數(shù)不大于0

MsgBox("請(qǐng)您選中所要?jiǎng)h除的行！",?MessageBoxButtons.OK,?MessageBoxIcon.Exclamation)

'DataGridView1.Rows.Clear()

End?If

End?Sub

運(yùn)行圖：

常用屬性：

1.想把Datagridview的第一行隱藏。?? ??Idea：把RowHeadersVisible屬性改為False就可以。

2.DataGridview顯示出datatable之后，最后一行有空白行怎么去掉？

Idea：修改AllowUserToAddRow屬性為False。

vb.net datagridview 無(wú)法添加行

默認(rèn)是可以添加行并編輯單元格的

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

Me.ResizeRedraw = True

Dim ff As New DataGridView

ff.ReadOnly = False‘在這里設(shè)置是否可編輯單元格

ff.Parent = Me

ff.AllowUserToAddRows = True'這里設(shè)置是否顯示添加新行

ff.Columns.Add("aa", "啊啊")

End Sub

vb.net datatable插入行

這個(gè)簡(jiǎn)單，用到DataTable的copy方法即可

如原始表是tb，則

Dim tb1 As DataTable = tb.Copy

接下來(lái)在tb1中添加刪除即可

最后綁定tb1不就得了

VB.net 可以在一個(gè)打開(kāi)著的Excel里添加數(shù)據(jù)行嗎？

VB.NET2008代碼：

Dim xlapp1 As Excel.Application

Dim xlworksheet As Excel.Worksheet

Dim xlworkbk As Excel.Workbook

xlapp1 = New Excel.Application

xlworkbk = xlapp1.Workbooks.Open("Excel文件名")

xlworksheet = xlworkbk.Worksheets("Sheet名")

xlworksheet.Cells.Item(行編號(hào), 列編號(hào)).value ="需要輸入的數(shù)據(jù)"

xlworkbk.Close()

另外，xlworksheet.UsedRange.Rows.Count是最大行數(shù)，可以用這個(gè)算行編號(hào)。

注意，需要引用Microsoft Excel Object Library（在COM的那個(gè)選項(xiàng)卡里）。