자료실

부자는 돈을 써서 시간을 아끼지만 가난한 사람은 시간을 써서 돈을 아낀다

vb.net

IT HUB를 찾아주셔서 감사합니다.

Controls [vb.net] datagridview 에서 endedit 호출 후 DataSource 의 checkbox 적용 안됨

페이지 정보

profile_image
작성자 하나를하더라도최선을
댓글 0건 조회 7,867회 작성일 20-03-23 12:59

본문

datagridview 에서 endedit 호출 후 DataSource 의  checkbox 적용 안됨
 


Public Class Form1
 
   Private WithEvents dt As New DataTable
   Private WithEvents dgv As New DataGridView
   Private WithEvents cm As New ContextMenuStrip
   Private WithEvents Item1 As New ToolStripButton With {.Text = "Item1"}
 
   Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles MyBase.Load
      Me.Size = New Size(400300)
      With dt
         .Columns.Add(New DataColumn("check1", GetType(Boolean)))
         .Columns.Add(New DataColumn("check2", GetType(Boolean)))
         .Columns.Add(New DataColumn("text1", GetType(String)))
      End With
      cm.Items.Add(Item1)
      dgv.Size = New Size(375250)
      dgv.DataSource = dt
      dgv.EditMode = DataGridViewEditMode.EditOnEnter
      dgv.ContextMenuStrip = cm
      Me.Controls.Add(dgv)
 
   End Sub
 
 
   Private Sub cm_Opening(ByVal sender As ObjectByVal e As System.ComponentModel.CancelEventArgs) Handles cm.Opening
      If dgv.CurrentRow.IsNewRow Then Exit Sub
      If dgv.CurrentCell.IsInEditMode Then
         dgv.EndEdit()
         CType(dgv.CurrentRow.DataBoundItem, DataRowView).EndEdit()
      End If
   End Sub
 
 
   Private Sub dt_RowChanged(ByVal sender As ObjectByVal e As System.Data.DataRowChangeEventArgs) Handles dt.RowChanged
      'write current values to Immediate Window
      Debug.WriteLine(String.Format("check1: {0}, check2: {1}, text1: {2}", e.Row(0).ToString, e.Row(1).ToString, e.Row(2).ToString))
   End Sub
End Class

댓글목록

등록된 댓글이 없습니다.