vb.net的dbgrid控件的網(wǎng)格線該如何設置

1.DataGrid 控件是一種類似于電子數(shù)據(jù)表的綁定控件，可以顯示一系列行和列來表示 Recordset 對象的記錄和字段。可以使用 DataGrid 來創(chuàng)建一個允許最終用戶閱讀和寫入到絕大多數(shù)數(shù)據(jù)庫的應用程序。DataGrid 控件可以在設計時快速進行配置，只需少量代碼或無需代碼。當在設計時設置了DataGrid 控件的 DataSource 屬性后，就會用數(shù)據(jù)源的記錄集來自動填充該控件，以及自動設置該控件的列標頭。然后您就可以編輯該網(wǎng)格的列；刪除、重新安排、添加列標頭、或者調(diào)整任意一列的寬度。

站在用戶的角度思考問題，與客戶深入溝通，找到北流網(wǎng)站設計與北流網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗，讓設計與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個性化、用戶體驗好的作品，建站類型包括：成都做網(wǎng)站、網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣、申請域名、網(wǎng)頁空間、企業(yè)郵箱。業(yè)務覆蓋北流地區(qū)。

2.在運行時，可以在程序中切換 DataSource 來察看不同的表，或者可以修改當前數(shù)據(jù)庫的查詢，以返回一個不同的記錄集合。

注意 DataGrid 控件與 Visual Basic 5.0中的 DBGrid 是代碼兼容的，除了一個例外：DataGrid 控件不支持 DBGrid 的“解除綁定模式”概念。DBGrid 控件包括在 Visual Basic 的 Tools 目錄中。

可能的用法

查看和編輯在遠程或本地數(shù)據(jù)庫中的數(shù)據(jù)。

與另一個數(shù)據(jù)綁定的控件（諸如 DataList 控件）聯(lián)合使用，使用DataGrid控件來顯示一個表的記錄，這個表通過一個公共字段鏈接到由第二個數(shù)據(jù)綁定控件所顯示的表。

3.使用 DataGrid 控件的設計時特性

可以不編寫任何代碼，只通過使用 DataGrid 控件的設計時特性來創(chuàng)建一個數(shù)據(jù)庫應用程序。下面的說明概要地說明了在實現(xiàn) DataGrid 控件的典型應用時的一般步驟。完整的循序漸進的指示，請參閱主題“DataGrid 方案1: 使用 DataGrid 控件創(chuàng)建一個簡單數(shù)據(jù)庫應用程序”。

要在設計時實現(xiàn)一個 DataGrid 控件

1. 為要訪問的數(shù)據(jù)庫創(chuàng)建一個 Microsoft 數(shù)據(jù)鏈接 (.MDL) 文件。請參閱“創(chuàng)建 Northwind OLE DB 數(shù)據(jù)鏈接”主題，以獲得一個示例。

2. 在窗體上放置一個 ADO Data 控件，并將其 ConnectionString 屬性設置為在第 1 步中所創(chuàng)建的OLE DB 數(shù)據(jù)源。

3. 在這個 Ado Data 控件的 RecordSource 屬性中輸入一條將返回一個記

錄集的 SQL 語句。例如，Select * From MyTableName Where CustID = 12

4. 在窗體上放置一個 DataGrid 控件，并將其 DataSource 屬性設置為這個 ADO Data 控件。

5. 右鍵單擊該 DataGrid 控件，然后單擊“檢索字段”。

6. 右鍵單擊該 DataGrid 控件，然后單擊“編輯”。

7. 重新設置該網(wǎng)格的大小、刪除或添加網(wǎng)格的列。

8. 右鍵單擊該 DataGrid 控件，然后單擊“屬性”。

9. 使用“屬性頁”對話框來設置該控件的適當?shù)膶傩裕瑢⒃摼W(wǎng)格配置為所需的外觀和行為。

在運行時更改顯示的數(shù)據(jù)

在創(chuàng)建了一個使用設計時特性的網(wǎng)格后，也可以在運行時動態(tài)地更改該網(wǎng)格的數(shù)據(jù)源。下面介紹實現(xiàn)這一功能的通常方法。

更改 DataSource 的RecordSource

更改所顯示的數(shù)據(jù)的最通常方法是改變該 DataSource 的查詢。例如，如果DataGrid 控件使用一個ADO Data控件作為其 DataSource，則重寫RecordSource和刷新該ADO Data 控件都將改變所顯示的數(shù)據(jù)。

' ADO Data 控件連接的是 Northwind 數(shù)據(jù)庫的' Products 表。新查詢查找所有

' SupplierID = 12 的記錄。

Dim strQuery As String

strQuery = "SELECT * FROM Suppliers WHERE SupplierID = 12"

Adodc1.RecordSource = strQuery

Adodc1.Refresh

更改 DataSource

在運行時，可以將 DataSource 屬性重新設置為一個不同的數(shù)據(jù)源。例如，您可能具有若干個 ADO Data 控件，每個控件連接不同的數(shù)據(jù)庫，或設置為不同的 RecordSource 屬性。可以簡單地將 DataSource 從一個 ADO Data控件重新設置為另一個 ADO Data 控件：

' 將 DataSource 重新設置為一個連接到 Pubs 數(shù)據(jù)庫的、

' 使用 Authors 表的 ADO Data 控件。

Set DataGrid1.DataSource = adoPubsAuthors

重新綁定 DataSource

當將 DataGrid 控件用于一個遠程數(shù)據(jù)庫，諸如 SQLServer 時，可以改變表的結(jié)構(gòu)。例如，可以給這個表添加一個字段。在這種情形下，可以調(diào)用Rebind 方法根據(jù)新的結(jié)構(gòu)來重新創(chuàng)建該網(wǎng)格。注意，如果已經(jīng)在設計時改變了這個列的布局，DataGrid 控件將會試圖重新創(chuàng)建當前的布局，包括任何空的列。不過，通過首先調(diào)用 ClearFields 方法，可以強制該網(wǎng)格重新設置所有的列。

從 DataGrid 返回值

在 DataGrid 被連接到一個數(shù)據(jù)庫后，可能想要監(jiān)視用戶單擊了哪一個單元。可以使用 RowColChange 事件——而不是 Click 事件。如下所示：

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)

' 顯示用戶所單擊的單元的文字、行和列的信息。

Debug.Print DataGrid1.Text; DataGrid1.Row; DataGrid1.Col

End Sub

使用 CellText 和 CellValue 方法

當一個列使用 NumberFormat 屬性設置格式后，CellText 和 CellValue 屬性是很有用的。NumberFormat 屬性不必更改實際的數(shù)據(jù)格式就可以更改任何包含數(shù)字的列的格式。例如，給定一個網(wǎng)格，其中包含一個名為 ProductID的、包含整數(shù)的列。下面的代碼將使 DataGrid 以"P-0000" 的格式來顯示數(shù)據(jù)。換句話說，盡管在 ProductID 字段中所包含的實際數(shù)值為 "3"，但該網(wǎng)格所顯示的值將是 "P-0003"。

Private Sub Form_Load()

DataGrid1.Columns("ProductID").NumberFormat = "P-0000"

End Sub

要返回數(shù)據(jù)庫中所包含的實際值，應使用 CellValue 方法，如下所示：

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)

Debug.Print _

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

End Sub

VB.net對Excel條件格式

首先,須在項目里引用: 添加引用-Com-Microsoft Excel 9.0 Object Library （這是EXCEL2000）

1 打開Excel： dim myexcel as new Excel.Application() myexcel.visible=true

2 添加新的工作簿： myexcel.Workbooks.add()

3 設定第二個工作表為活動工作表： myexcel.worksheets(2).Acivate()

4 打開指定的Excel文件： myexcel.workbooks.open("c:\my.xls")

5 顯示Excel窗口： myexcel.visible=true

6 更改Excel的標題欄： myexcel.caption="歡迎,歡迎!"

7 為Excel的單元格賦值： myexcel.cells(1,4).value=100 此語句使Excel當前工作表的第一行第四列,即D1單元格等于100, 也可以這樣寫: myexcel.Range("D1").value=100

8 設置指定列的寬度(單位:字符個數(shù))： myexcel.ActiveSheet.colums(1).columnwidth=20 設定當前工作表第1列的寬度為20

9 設置指定行的高度(單位:磅)： myexcel.ActiveSheet.rows(1).rowHeight=1/0.035 1磅 =0.035厘米 設置第1行的高度為1CM

10 插入分頁符： myexcel.Activesheet.rows(20).pagebreak=1 在第20行前插入分頁符

11 刪除分頁符： myexcel.Activesheet.columns(20).pagebreak=0 在第20列前刪除分頁符

12 指定邊框線的寬度： myexcel.Activesheet.range("B3:D3").borders(1).weight=3 其中borders參數(shù)指定單元格邊框的位置: 1:左 2:右 3:頂 4:底 5:斜\ 6:斜/

13 指定邊框線條的類型： myexcel.Activesheet.range("B1:D3").borders(2).linestyle=1 此語句將當前工作表的B1:D3單元格的右邊框設置為實線 linestyle參數(shù): 1:細實線 2:細虛線 3:點虛線 4:雙細實線

14 設置頁腳： myexcel.activesheet.pagesetup.centerfooter="第p頁" 注意:設置頁眉頁腳時要保證計算機上裝有打印機,否則出錯!

15 設置頁眉： myexcel.activesheet.pagesetup.centerfooter="第p頁"

16 設置頁眉到頂斷距離為2cm： myexcel.Activesheet.pagesetup.Headermargin=2/0.035

17 設置頁腳到底端距離為2cm： myexcel.Activesheet.pagesetup.Footermargin=2/0.035

18 設置頂邊邊距為2cm： myexcel.Activesheet.pagesetup.topmargin=2/0.035

19 設置底邊邊距為2cm： myexcel.Activesheet.pagesetup.Bottommargin=2/0.035

20 設置左邊邊距為2cm： myexcel.Activesheet.pagesetup.Leftmargin=2/0.035

21 設置右邊邊距為2cm： myexcel.Activesheet.pagesetup.Rightmargin=2/0.035

22 設置頁面水平居中： myexcel.activesheet.pagesetup.CenterHorizontally=true

23 設置頁面垂直居中： myexcel.activesheet.pagesetup.Centervertically=true

24 設置頁面紙張大小 (1,窄行 8.5*11 ;39 ,寬行 14*11)： myexcel.activesheet.pagesetup.papersize=1

25 打印單元格網(wǎng)格線： myexcel.activesheet.pagesetup.PrintGridlines=true

26 復制整個工作表 ： myexcel.activesheet.Usedrange.Copy

27 復制指定區(qū)域 ： myexcel.activesheet.range("a1:b5").Copy

28 粘貼： myexcel.worksheets("sheet2").range("A1").PasteSpecial

29 在第2行前插入一行 ： myexcel.activesheet.rows(2).Insert

30 在第2列前插入一列 ： myexcel.Activesheet.Columns(2).Insert

31 合并 C4:D4 單元格： myexcel.Activesheet.Range("C4:D4").Merge()

32 自動調(diào)整第2列列寬： myexcel.activesheet.Columns(2).AutoFit

33 設置字體： myexcel.Activesheet.cells(2,1).font.name="黑體"

34 設置字體大小： myexcel.Activesheet.cells(2,1).font.size=25

35 設置字體為斜體： myexcel.Activesheet.cells(2,1).font.Italic=true

36 設置字體為粗體： myexcel.Activesheet.cells(2,1).font.Bold=true

37 清除單元格內(nèi)容： myexcel.activesheet.cells(2,1).ClearContents

38 打印預覽工作表： myexcel.Activesheet.PrintPreview

39 打印工作表： myexcel.Activesheet.Printout

40 工作表另存為： myexcel.ActiveWorkbook.saveas("C:\book2.xls")

41 放棄存盤： myexcel.ActiveWorkbook.saved=false

42 關閉工作簿： myexcel.Workbooks.close

43 退出 Excel： myexcel.quit

清楚了這些命令，操作excel不就變的很輕松了！

datagridview的單元格邊框怎么設置

DataGridView

的邊框線樣式的設定

DataGridView

的邊框線的樣式是通過

DataGridView.BorderStyle

屬性來設定的。

BorderStyle

屬性設定值是一個

BorderStyle

枚舉：

FixedSingle（單線，默認）、Fixed3D、None。

2)

單元格的邊框線樣式的設定單元格的邊框線的樣式是通過

DataGridView.CellBorderStyle

屬性來設定的。

CellBorderStyle

屬性設定值是

DataGridViewCellBorderStyle

枚舉。（詳細參見

MSDN）

另外，通過

DataGridView.ColumnHeadersBorderStyle

和

RowHeadersBorderStyle

屬性可以修改

DataGridView

的頭部的單元格邊框線樣式。

屬性設定值是

DataGridViewHeaderBorderStyle

枚舉。（詳細參見

MSDN）

3）

單元格的邊框顏色的設定

單元格的邊框線的顏色可以通過

DataGridView.GridColor

屬性來設定的。默認是

ControlDarkDark

。但是只有在

CellBorderStyle

被設定為

Single、SingleHorizontal、SingleVertical

的條件下才能改變其邊框線的顏色。同樣，ColumnHeadersBorderStyle

以及

RowHeadersBorderStyle

只有在被設定為

Single

時，才能改變顏色。

4）

單元格的上下左右的邊框線式樣的單獨設定

CellBorderStyle只能設定單元格全部邊框線的式樣。要單獨改變單元格某一邊邊框式樣的話，需要用到DataGridView.AdvancedCellBorderStyle屬性。如示例：[VB.NET]'

單元格的上邊和左邊線設為二重線

'

單元格的下邊和右邊線設為單重線

DataGridView1.AdvancedCellBorderStyle.Top

=

_

DataGridViewAdvancedCellBorderStyle.InsetDouble

DataGridView1.AdvancedCellBorderStyle.Right

=

_

DataGridViewAdvancedCellBorderStyle.Inset

DataGridView1.AdvancedCellBorderStyle.Bottom

=

_

DataGridViewAdvancedCellBorderStyle.Inset

DataGridView1.AdvancedCellBorderStyle.Left

=

_

vb.net 設置EXCEL單元格的邊框，只在下邊有邊框，其他三邊沒有邊框，求代碼

objRange.Borders(XlBordersIndex.xlEdgeBottom).LineStyle = XlLineStyle.xlContinuous

objRange.Borders(XlBordersIndex.xlEdgeBottom).ColorIndex = 1

objRange.Borders(XlBordersIndex.xlEdgeBottom).Weight = XlBorderWeight.xlThin

文章標題：vb.net表格線設置的簡單介紹
文章路徑：http://www.chinadenli.net/article36/dooiisg.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供做網(wǎng)站、網(wǎng)站改版、企業(yè)網(wǎng)站制作、面包屑導航、移動網(wǎng)站建設、商城網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)