vb.net datagridview 幾行一起排序

黑體字下面是要這樣嗎？?vb的代碼 我不太懂，只會c#的，? 但是給你個思路， 就是縱向合并單元格嘛。?

創新互聯專注于當涂網站建設服務及定制，我們擁有豐富的企業做網站經驗。 熱誠為您提供當涂營銷型網站建設，當涂網站制作、當涂網頁設計、當涂網站官網定制、微信小程序服務，打造當涂網絡公司原創品牌,更為您提供當涂網站排名全網營銷落地服務。

我貼一段c#的代碼，。，?您理解下，?應該不困難。。。

代碼 把AllowUserToAddRows設置為false

private void dataGridView1_CellPainting(object sender, DataGridViewCellPaintingEventArgs e)

{

//縱向合并

if (this.dataGridView1.Columns["Name"].Index == e.ColumnIndex e.RowIndex = 0)

{

using (

Brush gridBrush = new SolidBrush(this.dataGridView1.GridColor),

backColorBrush = new SolidBrush(e.CellStyle.BackColor))

{

using (Pen gridLinePen = new Pen(gridBrush))

{

// 擦除原單元格背景

e.Graphics.FillRectangle(backColorBrush, e.CellBounds);

/**/

////繪制線條,這些線條是單元格相互間隔的區分線條,

////因為我們只對列name做處理,所以datagridview自己會處理左側和上邊緣的線條

if (e.RowIndex != this.dataGridView1.RowCount - 1)

{

try

{

if (e.Value.ToString() != this.dataGridView1.Rows[e.RowIndex +

1].Cells[e.ColumnIndex].Value.ToString())

{

e.Graphics.DrawLine(gridLinePen, e.CellBounds.Left, e.CellBounds.Bottom - 1,

e.CellBounds.Right - 1, e.CellBounds.Bottom - 1);//下邊緣的線

//繪制值

if (e.Value != null)

{

e.Graphics.DrawString((String)e.Value, e.CellStyle.Font,

Brushes.Crimson, e.CellBounds.X + 2,

e.CellBounds.Y + 2, StringFormat.GenericDefault);

}

}

}

catch (Exception ex)

{

}

}

else

{

e.Graphics.DrawLine(gridLinePen, e.CellBounds.Left, e.CellBounds.Bottom - 1,

e.CellBounds.Right - 1, e.CellBounds.Bottom - 1);//下邊緣的線

//繪制值

if (e.Value != null)

{

e.Graphics.DrawString((String)e.Value, e.CellStyle.Font,

Brushes.Crimson, e.CellBounds.X + 2,

e.CellBounds.Y + 2, StringFormat.GenericDefault);

}

}

//右側的線

e.Graphics.DrawLine(gridLinePen, e.CellBounds.Right - 1,

e.CellBounds.Top, e.CellBounds.Right - 1,

e.CellBounds.Bottom - 1);

e.Handled = true;

}

}

}

}

下面是我用的datatable?? 這個dataset是網上copy的

DataSet dataset = new DataSet();//庫

//表

DataTable myfriends = new DataTable("myfriends");

//列

DataColumn dcName = new DataColumn();

dcName.ColumnName = "Name";

dcName.DataType = typeof(string);

dcName.MaxLength = 8;

DataColumn dcPhone = new DataColumn();

dcPhone.ColumnName = "telephone";

dcPhone.DataType = typeof(string);

dcPhone.MaxLength = 11;

//添加列

myfriends.Columns.Add(dcName);

myfriends.Columns.Add(dcPhone);

//添加1行

DataRow row = myfriends.NewRow();//得到空行

row["Name"] = "小明";

row["telephone"] = "13888888888";

DataRow row1 = myfriends.NewRow();//得到空行

row1["Name"] = "小明";

row1["telephone"] = "15859859888";

DataRow row2 = myfriends.NewRow();//得到空行

row2["Name"] = "豬豬";

row2["telephone"] = "15999999999";

myfriends.Rows.Add(row);

myfriends.Rows.Add(row1);

myfriends.Rows.Add(row2);

//添加表到dataset

dataset.Tables.Add(myfriends);

dataGridView1.DataSource = myfriends;

vb.net 如何對數據庫查詢結果記錄集排序？

加了單引號就是一個常量字符串了，對于每一行都是一樣的

像這種放在最前面的字段，order by 1 就可以了

VB.NET中數據的排序問題

建議用 DataGridView（你用的是它吧？）內建的排序方法來排序。介紹和示例代碼可以參考MSDN：

VB.net 排序

你這個是冒泡排序么？從大到小么？

For j = 0 To lstNetworkRisk.Items.Count - 1 應該改成

For j = i To lstNetworkRisk.Items.Count - 1

另外盡量不要用GOTO語句。而且完全也可以不用這個GOTO。

還有不知道你用的什么版本的.net 如果是3.5的完全可以直接用linq。

vb.net 排列組合 代碼

第一題:

不需要任何控件,代碼如下:

Private Sub Form_Click()

Dim A() As Integer, N As Integer

Dim St As String, I As Integer, J As Integer

Randomize

Do

St = InputBox("數字的個數", "輸入", Int(Rnd * 100))

If St = "" Then

MsgBox "請輸入數字!"

Else

N = Int(Val(St))

If N 1 Then

MsgBox "請輸入大于0的數字!"

Else

Exit Do

End If

End If

Loop

ReDim A(N)

For I = 1 To N

Do

St = InputBox("第" + Str(I) + "個數字", "輸入", Int(Rnd * 100))

If St = "" Then

MsgBox "請輸入數字!"

Else

A(I) = Int(Val(St))

Exit Do

End If

Loop

Next

For I = 1 To N - 1

For J = I + 1 To N

If A(I) A(J) Then

A(0) = A(I)

A(I) = A(J)

A(J) = A(0)

End If

Next

Next

For I = 1 To N

Open App.Path "\" Trim(Str(I)) ".txt" For Output As #1

Print #1, A(I)

Close #1

Next

Print "已經把"; N; "個數寫入到"; App.Path; "\1.txt 到 "; N; ".txt中.請查看."

End Sub

'已經運行過.

第二題:

DIM 是變量聲明語句,它的格式為:

dim 變量名[as 格式] [,變量名[as 格式][,變量名[as 格式]......]

其中:

變量名:以字母或漢字開始的字串,代表一個變量

格式有以下幾種:

屬于數字的有五種:

(1)字節型:byte可取值0-255

(2)整形:integer可取值-32768至32767

(3)長整形:long(可取值范圍很大的正負整數)

(4)單精度型:single(可取值小數)

(5)雙精度型:double(可取值范圍更大,小數位數更多的小數)

字符串型:string(可代表由字母\數字或漢字組成的字符集合)

布爾型:boolean(取值為ture\false)

日期型:date(可表示形如2009-5-26 02:36這樣的組合)

如果要用姓名\住址\單位名稱...等用字符串型(string)

eg:dim name as string(用name變量表示名字時,聲明成字符串變量)

如果是用數字需要做計算,如工資\合計\人數....等要用數字型,但有一個原則,優先選用范圍小的(按照字節型(byte)\整形(integer)\長整形(long)\單精度型(single)\雙精度型(double)的順序選擇),夠用就可以了,這樣可以占用內存少,運算速度快.

eg:dim count as integer(用integer表示員工人數時,可聲明成整形變量)

eg:dim sum as single(用sum表示工資時,可聲明成單精度型變量)

不知是否說得清楚了.

網站欄目：vb.net漢字排序 C語言漢字排序
當前URL：http://www.yijiale78.com/article0/doddhio.html

成都網站建設公司_創新互聯，為您提供商城網站、定制網站、微信公眾號、做網站、網頁設計公司、品牌網站建設

廣告

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