|
|
|
อยากไม่ให้ DataGridView โชว์ข้อมูลที่ไม่ต้องการ บาง Column ต้องทำยังไงเหรอครับ |
|
|
|
|
|
|
|
ตามรูปเลยครับไม่อยากให้แสดงต้องทำยังไงครับ
ส่วนนี้โค้ด
Code (VB.NET)
Dim dt As New DataTable
Dim dtAdapter As MySqlDataAdapter
Dim sqlmem As String = ""
sqlmem = "SELECT member.Member_ID,member.Prefix_ID,member.Name,member.Lastname,member.share,dividend.Member_ID FROM member,dividend" ' WHERE member.Member_ID=dividend.Member_ID" ',dividend"
dtAdapter = New MySqlDataAdapter(sqlmem, cn)
dtAdapter.Fill(dt)
myConnection.Close()
Me.dgseeDivi.DataSource = dt
Me.dgseeDivi.Columns.Clear()
Dim column As DataGridViewTextBoxColumn
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Member_ID"
column.HeaderText = "เลขที่สมาชิก"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Prefix_ID"
column.HeaderText = ""
column.Width = 50
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Name"
column.HeaderText = "ชื่อ"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Lastname"
column.HeaderText = "นาสกุล"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "share"
column.HeaderText = "จำนวนหุ้น"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
Dim dataColumn As DataColumn = New DataColumn()
dataColumn.ColumnName = "ยอดเงินปันผล"
dataColumn.DataType = System.Type.GetType("System.Double")
dt.Columns.Add(dataColumn)
For Each dataRow As DataRow In dt.Rows
Dim Result As Double
Result = CDbl(dataRow(4)) * CDbl(lbdivi.Text) 'index ที่ 4 คือ จำนวนหุ้น, อัตราการปันผล ตามลำดับ
dataRow(5) = Result 'index ที่ 4 คืออันที่เพิ่มเข้าไปใหม่
Next
dgseeDivi.DataSource = dt
dt = Nothing
ผู้รู้ช่วยหน่อยนะครับบ
Tag : .NET, MySQL, Win (Windows App), VB.NET
|
|
|
|
|
|
Date :
2012-01-06 22:23:45 |
By :
chaokouy |
View :
2091 |
Reply :
7 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
dgseeDivi.Columns(2).Visible =false
|
ประวัติการแก้ไข 2012-01-07 13:09:53
|
|
|
|
Date :
2012-01-07 11:26:14 |
By :
bangbang111 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
จากโค้ด บรรทัดที่ 4 เอา dividend.Member_ID ออกจาก SELECT
|
|
|
|
|
Date :
2012-01-07 15:49:59 |
By :
watcharop |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ก็ไม่ต้อง select ออกมาครับ q^_^'p
|
|
|
|
|
Date :
2012-01-07 21:42:18 |
By :
q=_=\'p |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ตอบเจ้าของกระทู้
สาเหตุอาจเกิดจากการเีรียงลำดับ Coding ครับ
Code (VB.NET)
'คำสั่งนี้คือ เพิ่มคอลัมน์ใหม่ (ซึ่งไม่ได้ดึงมาจากฐานข้อมูล) ทำให้การแสดงผลซ้ำ แสดงข้อมูลก่อนหน้ามาด้วย
Dim dataColumn As DataColumn = New DataColumn()
dataColumn.ColumnName = "ยอดเงินปันผล"
dataColumn.DataType = System.Type.GetType("System.Double")
dt.Columns.Add(dataColumn)
ลองสับเปลี่ยนโค๊ตเป็นแบบนี้ดูสิครับ
Code (VB.NET)
Dim dt As New DataTable
Dim dtAdapter As MySqlDataAdapter
Dim sqlmem As String = ""
sqlmem = "SELECT member.Member_ID,member.Prefix_ID,member.Name,member.Lastname,member.share,dividend.Member_ID FROM member,dividend" ' WHERE member.Member_ID=dividend.Member_ID" ',dividend"
dtAdapter = New MySqlDataAdapter(sqlmem, cn)
dtAdapter.Fill(dt)
myConnection.Close()
Me.dgseeDivi.DataSource = dt
'ย้ายมาไว้ตรงนี้
Dim dataColumn As DataColumn = New DataColumn()
dataColumn.ColumnName = "dividend" 'เปลี่ยนชื่อจาก "ยอดเงินปันผล" เป็น dividend ผมไม่แน่ใจว่าตั้งชื่อตัวแปรภาษาไทยแล้วจะมีปัญหาไหม?
dataColumn.DataType = System.Type.GetType("System.Double")
dt.Columns.Add(dataColumn)
For Each dataRow As DataRow In dt.Rows
Dim Result As Double
Result = CDbl(dataRow(4)) * CDbl(lbdivi.Text) 'index ที่ 4 คือ จำนวนหุ้น, อัตราการปันผล ตามลำดับ
dataRow(5) = Result 'index ที่ 4 คืออันที่เพิ่มเข้าไปใหม่
Next
'เคลียร์ค่าแล้วค่อยดึงมาแสดงผล
Me.dgseeDivi.Columns.Clear()
Dim column As DataGridViewTextBoxColumn
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Member_ID"
column.HeaderText = "เลขที่สมาชิก"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Prefix_ID"
column.HeaderText = ""
column.Width = 50
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Name"
column.HeaderText = "ชื่อ"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "Lastname"
column.HeaderText = "นาสกุล"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "share"
column.HeaderText = "จำนวนหุ้น"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
'เรียกคอลัมน์ dividend มาแสดงผล
column = New DataGridViewTextBoxColumn()
column.DataPropertyName = "dividend"
column.HeaderText = "ยอดเงินปันผล"
column.Width = 70
Me.dgseeDivi.Columns.Add(column)
'dgseeDivi.DataSource = dt โค๊ตนี้ไม่ใช้
dt = Nothing
|
ประวัติการแก้ไข 2012-01-16 14:12:12
|
|
|
|
Date :
2012-01-16 14:09:39 |
By :
InsitizrT |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ขอบคุณครับบบ ทุกๆคอมเม้นๆ
และคุณ ๏InsitizrT๏
|
|
|
|
|
Date :
2012-01-16 15:47:39 |
By :
chaokouy |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ขอดูตัวอย่างหน้าฟอร์มได้มั้ยคะ
|
|
|
|
|
Date :
2013-02-06 00:40:37 |
By :
Aonaka |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 05
|