Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,036

HOME > .NET Framework > Forum > [VB.NET] ค้นหาข้อมูลใน datagridview ให้แสดงเฉพาะข้อมูลที่ต้องการ



 

[VB.NET] ค้นหาข้อมูลใน datagridview ให้แสดงเฉพาะข้อมูลที่ต้องการ

 



Topic : 101543



โพสกระทู้ ( 13 )
บทความ ( 0 )



สถานะออฟไลน์




คือไม่ต้องการให้มันโชว์รูปภาพเวลาค้นหาคับ (ram_image) ควรแก้ตรงไหนคับ



Code (VB.NET)
 Private Sub search_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles search.Click
        If txtFind.Text = "" Then
            MessageBox.Show("ท่านยังไม่ระบุข้อมูลที่ต้องการค้นหา!!!", "คำเตือน", MessageBoxButtons.OK, MessageBoxIcon.Warning)
            txtFind.Focus()
            Exit Sub
        End If
        Try
            Dim strsql As String = ("SELECT * FROM ram where ram_brand like '%" & txtFind.Text & "%' ")
            With sqlConn
                If .State = ConnectionState.Open Then .Close()
                .Open()
            End With
            With sqlDA
                .SelectCommand = New SqlCommand(strsql, sqlConn)
                dsShow.Clear()
                .Fill(dsShow, "ram")
            End With
            If dsShow.Tables("ram").Rows.Count > 0 Then
                With dgshow
                    .DataSource = dsShow.Tables("ram")
                    dgshow.Columns(0).HeaderText = "รหัส"
                    dgshow.Columns(1).HeaderText = "ยี่ห้อ"
                    dgshow.Columns(2).HeaderText = "ประเภท"
                    dgshow.Columns(3).HeaderText = "ขนาด"
                    dgshow.Columns(4).HeaderText = "บัส"
                    dgshow.Columns(5).HeaderText = "ราคา"
                    dgshow.Columns(6).HeaderText = "ประกัน"
                    dgshow.Columns(0).Width = 60
                    dgshow.Columns(1).Width = 100
                    dgshow.Columns(2).Width = 80
                    dgshow.Columns(3).Width = 80
                    dgshow.Columns(4).Width = 80
                    dgshow.Columns(5).Width = 70
                    dgshow.Columns(6).Width = 70
                    dgshow.Show()
                    .ReadOnly = True
                    .AllowUserToAddRows = False
                End With
            Else
                MessageBox.Show("ไม่พบข้อมูลที่ค้นหา")
                txtFind.Focus()
                txtFind.Text = ""
            End If
        Catch ex As Exception
            MessageBox.Show("เกิดข้อผิดพลาดเนื่องจาก" & ex.Message, "ข้อผิดพลาด", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Finally
            txtFind.Text = ""
            sqlConn.Close()
        End Try
    End Sub


ขอบคุณคับ



Tag : .NET, Ms SQL Server 2008, Crystal Report, VS 2010 (.NET 4.x), Windows







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2013-10-10 20:38:45 By : monkeyon View : 3586 Reply : 10
 

 

No. 1

Guest


ถ้าคุณจะโกรธผม ผมคิดว่าคุณทำ(คิด) ถูกต้องแล้วครับ ถ้าผมจะบอกว่า
ทั้ง Screen Design(หน้าจอ) และ SourceCode (วิธีที่คุณคิด) มันใช้ไม่ได้แม้แต่บรรทัดเดียว
...
...
...
มีอีกนะครับ แต่ผมระมัดระวังมารยาทพอสมควรและละเอาไว้ให้เป็นที่เข้าใจครับ


เหตุผล : มันซ้ำซาก มันเดิมเดิม มันไม่มีอะไรแปลกและแหวกแนว ครับ
ถ้าผมเป็นอาจารย์ของคุณ ผมให้คะแนนคุณ 30 จาก 100 คะแนน
และผมให้คะแนนอาจารย์ของคุณ -100000000000000000000 จาก 10000000000000000000000 (ไม่ถ้วนค่ะแนน)
ผมอาจจะพิมพ์ผิด แต่ความรู้สึกของผมคนเดียวมันไม่น่าจะผิดพลาดเกิน -.001<.01<.1






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-10 22:02:32 By : ผ่านมา
 


 

No. 2



โพสกระทู้ ( 697 )
บทความ ( 0 )



สถานะออฟไลน์
Facebook

เข้าไปแก้ที่หน้า Design ในตัว DataGridView ลบคอลัมป์ออกได้ปะครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-10 22:08:10 By : 01000010
 

 

No. 3



โพสกระทู้ ( 13 )
บทความ ( 0 )



สถานะออฟไลน์


ตอบความคิดเห็นที่ : 2 เขียนโดย : 01000010 เมื่อวันที่ 2013-10-10 22:08:10
รายละเอียดของการตอบ ::
ยังไม่ได้เลยอะคับ

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-10 22:58:44 By : monkeyon
 


 

No. 4

Guest


นายใช้ autogeneratecolumn อยู่ใช่เปล่า

ใช้แบบ add column เองสิ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 07:51:38 By : ห้ามตอบเกินวันละ 2 กระทู้
 


 

No. 5

Guest


บรรทัดที่ 20 แทรกคำสั่งนี้ลงไปครับ
Code (VB.NET)
dgshow.AutoGenerateColumns = False

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 07:55:37 By : ผ่านมา
 


 

No. 6

Guest


ผมให้ดูเป็นตัวอย่างครับ ผมยังไม่ได้เกลา SourceCode
xTempMat


Code (VB.NET)
Dim dtGV As New DataTable()

dtGV.Columns.Add("C1", GetType(String))
dtGV.Columns.Add("C2", GetType(String))
dtGV.Columns.Add("C3", GetType(String))
dtGV.Columns.Add("C4", GetType(String))
dtGV.Columns.Add("C5", GetType(String))


dtGV.Rows.Add(New Object() {})
dtGV.Rows.Add(New Object() {})
dtGV.Rows.Add(New Object() {})
dtGV.Rows.Add(New Object() {})

Me.dgvLayout.RowTemplate.MinimumHeight = 30
Me.dgvLayout.AutoGenerateColumns = False
Me.dgvLayout.ColumnHeadersHeight = 30

For i As Integer = 0 To 23
    Me.dgvLayout.Columns.Add(New DataGridViewTextBoxColumn() With {.Name = i + 1, .Width = 30})
    Me.dgvLayout.Columns(i).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
    Me.dgvEditMsg.Columns.Add(New DataGridViewTextBoxColumn() With {.Name = i + 1, .Width = 90})
    Me.dgvEditMsg.Columns(i).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
    Me.dgvEditMsg.Columns(i).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
Next

For Each dr As DataRow In dtGV.Rows
    Me.dgvLayout.Rows.Add(dr.ItemArray)            
Next


แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 08:16:18 By : ผ่านมา
 


 

No. 7

Guest


#NO 6 ผมออกแบบเอาไว้ลอยฯ แขวนเอาไว้ พ่วงด้วยความกดดันสารเพลมพัด

เมื่อสองวันก่อนผมไป จ.นครสวรรค์ ดู Line ผลิตจริง
ก่อนออกจากบ้าน ภรรยาของผมถามว่า "มีโอกาสได้งานนี้ไหม"
ผมตอบว่า "ไม่มีทางที่ผมจะได้ทำงานนี้แน่นอน" ยิ่งกว่า 100%
ภรรยาของผมบ่นตามหลัง "ผัวจ๋าเราไม่มีข้าวสารจะกรอกหม้อแล้วนะ หนูไม่ได้ใส่กางเกงในมาเป็นอาทิตย์แล้ว"


พอไปถึงโรงงาน ผมก็เข้าไปในห้องควบคุมระบบ (อัตโนมัติอยู่แล้ว) ขอฆ้อนหน่อยครับ
เจ้าหน้าที่ : พี่จะเอามาทำไมล่ะ
ผมตอบว่า : ผมจะเอามาทุบตู้คอนโทรลหลัก เพื่อจะดูว่าข้างในมันมีอะไรบ้าง? (ขนาดตู้ประมาณ รถ 18 ล้อ)
ไฟระยิบระยับยิ่งกว่างานคอนเสริต์อีกว่ะ

เจ้าหน้าที่ : พี่ไม่กลัวมันเสียหรือครับ
ผมตอบ : ไม่กลัว เพราะมันไม่ใช่ของผม (กู)
...
...
...
...

[x] อยากรู้ไหมว่าทำไมผมถึงต้องไป ทั้งฯที่ไม่มีโอกาสที่จะได้งานนี้เลย?
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 08:36:43 By : ผ่านมา
 


 

No. 8

Guest


จาก #NO 7
ผมก็คุยกับวิศวะกรไฟฟ้า และวิศวะกรเครื่องกล (ดูจากหน้างานมันต้องสัมพันธ์กันอยู่แล้ว)

มีอยู่ประโยคหนึ่งที่ผมพูดออกไป : ถ้าผมไม่ถามคุณก็ไม่ต้องอธิบายให้ผมฟังก็ได้ครับ ผมเกรงใจครับ
(โน่นคืออะไร นี่คืออะไร, etc)
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 08:45:22 By : ผ่านมา
 


 

No. 9

Guest


สมมุติว่าคุณทำโปรเจคจบ และจากคำถามของคุณ (Hardware) ผมมีไอเดียนำเสนอคุณครับ
ให้คุณเปลี่ยนหัวข้อโปรเจคเป็น USB/Serial Port Connections

และสมมุติต่อไปอีกว่า คุณเลือก Serial Port
-คุณก็ต้องไปดูว่ามันเชื่อมต่อกับอุปกรณ์ภายนอก (Various Signal) อย่างไร เช่น เครื่อง CNC, PLC, Weigth Scale, Print Server, etc
-ลำัพังสายสัญญาน แค่ 9 เส้น (2, 3, 5) TX, RX, Ground มันพอใช้งานได้จริงหรือไม่?
--- ไม่พอแน่นอนว่ามันต้องขยายช่องสัญญาน ทำอย่างไรล่ะ?
-ระบบแรงดัน (TTL) เท่าไหร่ อยู่ในช่วงไหน (Period) +- 3V เป็นต้น ระยะทางไกล้ไกล (Distance)
-ความแปรปรวนต่างเช่น ภายใน/ภายนอก ความชื้น etc มีผลกระทบอะไรไหม?
-...
-...

ขอให้โชคดีครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 09:11:33 By : ผ่านมา
 


 

No. 10



โพสกระทู้ ( 13 )
บทความ ( 0 )



สถานะออฟไลน์


ตอบความคิดเห็นที่ : 5 เขียนโดย : ผ่านมา เมื่อวันที่ 2013-10-11 07:55:37
รายละเอียดของการตอบ ::
ได้แล้วคับแก้ตั้งนาน แค่บรรทัดเดียวจิง ๆ ของคุณทุกคนมากๆคับ

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-10-11 11:35:54 By : monkeyon
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : [VB.NET] ค้นหาข้อมูลใน datagridview ให้แสดงเฉพาะข้อมูลที่ต้องการ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 01
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่