ProjectForStudy

 ลืมรหัสผ่าน
 ลงทะเบียน
ค้นหา
ดู: 77|ตอบกลับ: 2

[ถาม/ตอบ] สอบเรื่อง Datagridview add string และ add จาก datatable + checkBox ครับ

[คัดลอกลิงก์]
  • อารมณ์วันนี้
    ง่วง
    2019-4-30 21:59
  • เช็คชื่อแล้ว: 33 วัน

    [LV.5]JuniorI

    15

    กระทู้

    89

    โพสต์

    196

    เครดิต

    CodeDragon

    Rank: 2

    เครดิต
    196
    Ticket
    64
    จิตพิสัย
    132
    แก้ไขครั้งสุดท้ายโดย dododohua เมื่อ 2019-4-17 03:27
    1. <div class="blockcode"><blockquote>Dim date_now As String = DateTime.Now.ToString("dd/MM/yyyy")
    2. Dim daydefine As Integer = dt.Rows(0)("pos_qtydate")
    3. date_define = DateTime.Now.AddDays(+daydefine).ToString("dd/MM/yyyy")

    4. If e.KeyData = Keys.Enter Then
    5.             sql = "select * from View_ManageBook where book_id='" & txt_bookSearch.Text & "'"
    6.             Dim dt As DataTable = cmd_excuteToDataTable()
    7.             If dt.Rows.Count = 0 Then
    8.                 warning_message("ไม่พบข้อมูล")
    9.                 txt_bookSearch.SelectAll()
    10.                 Return
    11.             Else
    12.                 book_id = dt.Rows(0)("book_id")
    13.                 book_name = dt.Rows(0)("book_name")
    14.                 Dim row As String() = New String() {book_name, date_now, date_define}
    15.                 dgv_BookIN.Rows.Add(row)
    16.                 Dim chk As New DataGridViewCheckBoxColumn()
    17.                 chk.ValueType = GetType(Boolean)
    18.                 chk.Name = "chk"
    19.                 chk.HeaderText = "เลือก"
    20.                 chk.Width = 70
    21.                 dgv_BookIN.Columns.Add(chk)
    22.             End If
    23.         End If
    คัดลอกไปที่คลิปบอร์ด



    ขอคำปรึกษาครับ ทำไปทำมางง เอง  

    ขออภัย! โพสต์นี้มีไฟล์แนบหรือรูปภาพที่ไม่ได้รับอนุญาตให้คุณเข้าถึง

    คุณจำเป็นต้อง ลงชื่อเข้าใช้ เพื่อดาวน์โหลดหรือดูไฟล์แนบนี้ คุณยังไม่มีบัญชีใช่ไหม? ลงทะเบียน

    x
  • อารมณ์วันนี้
    เครียด
    2019-4-23 07:47
  • เช็คชื่อแล้ว: 12 วัน

    [LV.3]BeginnerII

    0

    กระทู้

    40

    โพสต์

    114

    เครดิต

    BabyGhost

    Rank: 1

    เครดิต
    114
    Ticket
    29
    จิตพิสัย
    85
    ferigo โพสต์ 2019-4-17 11:02:29 | ดูโพสต์ทั้งหมด
    ไม่รู้ใช่แบบนี้ไหมครับ..

    1. Dim dt As New DataTable()
    2. Dim r = cmd.ExecuteReader()

    3. dt.Load(r)
    4. dgv_BookIN.DataSource = dt
    คัดลอกไปที่คลิปบอร์ด


  • อารมณ์วันนี้
    ง่วง
    2019-4-30 21:59
  • เช็คชื่อแล้ว: 33 วัน

    [LV.5]JuniorI

    15

    กระทู้

    89

    โพสต์

    196

    เครดิต

    CodeDragon

    Rank: 2

    เครดิต
    196
    Ticket
    64
    จิตพิสัย
    132
     เจ้าของ| dododohua โพสต์ 2019-4-17 16:12:53 | ดูโพสต์ทั้งหมด
    ferigo ตอบกลับเมื่อ 2019-4-17 11:02
    ไม่รู้ใช่แบบนี้ไหมครับ..

    Dim dt As New DataTable()

    เดี๋ยวผมลองทดสอบดูครับ ขอบคุณความรู้ครับผม
    ขออภัย! คุณไม่ได้รับสิทธิ์ในการดำเนินการในส่วนนี้ กรุณาเลือกอย่างใดอย่างหนึ่ง ลงชื่อเข้าใช้ | ลงทะเบียน

    รายละเอียดเครดิต

    ข้อความล้วน|อุปกรณ์พกพา|ประวัติการแบน|ProjectForStudy  

    GMT+7, 2019-5-24 04:38 , Processed in 0.055955 second(s), 27 queries .

    Powered by Discuz! X3.2 R20150609, Rev.38

    © 2001-2013 Comsenz Inc.

    ตอบกระทู้ ขึ้นไปด้านบน ไปที่หน้ารายการกระทู้