ProjectForStudy

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

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

[คัดลอกลิงก์]
  • อารมณ์วันนี้
    ง่วง
    2019-5-27 11:30
  • เช็คชื่อแล้ว: 34 วัน

    [LV.5]JuniorI

    15

    กระทู้

    90

    โพสต์

    203

    เครดิต

    CodeDragon

    Rank: 2

    เครดิต
    203
    Ticket
    65
    จิตพิสัย
    138
    แก้ไขครั้งสุดท้ายโดย 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-8-26 16:46
  • เช็คชื่อแล้ว: 15 วัน

    [LV.4]BeginnerIII

    0

    กระทู้

    46

    โพสต์

    135

    เครดิต

    BabyGhost

    Rank: 1

    เครดิต
    135
    Ticket
    40
    จิตพิสัย
    95
    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-5-27 11:30
  • เช็คชื่อแล้ว: 34 วัน

    [LV.5]JuniorI

    15

    กระทู้

    90

    โพสต์

    203

    เครดิต

    CodeDragon

    Rank: 2

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

    Dim dt As New DataTable()

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

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

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

    GMT+7, 2019-9-17 15:49 , Processed in 0.051269 second(s), 25 queries .

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

    © 2001-2013 Comsenz Inc.

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