Data Grid Check box problem

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • Stephen Plotnick

    Data Grid Check box problem

    I have a checkbox in a data grid that does not change it's state until I
    actually leave the field. I've done this routine several times in other data
    grids without an issue.

    I'm using VB.2003.

    Steve


  • Stephen Plotnick

    #2
    Re: Data Grid Check box problem

    Strange thing; I moved the column to another column and it works as
    expected. I really need the column where I had it before.

    I move the column from the last column to the first to make it work.

    Here is the code:
    '

    ' Create GridColumnStyle objects for the grid columns

    '

    Dim aCol1 As New DataGridTextBox Column

    Dim aCol1a As New DataGridTextBox Column

    Dim aCol2 As New DataGridTextBox Column

    Dim aCol3 As New DataGridTextBox Column

    Dim aCol5 As New DataGridTextBox Column

    Dim aCol6 As New DataGridTextBox Column

    Dim aCol7 As New DataGridTextBox Column

    Dim aCol8 As New DataGridTextBox Column

    Dim aCol9 As New DataGridTextBox Column

    Dim aCol10 As New DataGridTextBox Column

    Dim aCol11 As New DataGridTextBox Column

    Dim aCol11a As New DataGridTextBox Column

    Dim aCol12 As New DataGridTextBox Column

    Dim aCol13 As New DataGridTextBox Column

    Dim aCol14 As New DataGridTextBox Column

    Dim aCol15 As New DataGridBoolCol umn

    '

    ' Set column's caption, width and disable editing.

    '

    With aCol1

    ..HeaderText = "Product SKU"

    ..MappingName = "ProductSKU "

    ..Width = 65

    ..Alignment = HorizontalAlign ment.Left

    ..TextBox.Enabl ed = False

    End With

    With aCol1a

    ..HeaderText = "Descriptio n"

    ..MappingName = "InvoiceDescrip ton"

    ..Width = 203

    ..Alignment = HorizontalAlign ment.Left

    ..TextBox.Enabl ed = False

    End With

    With aCol2

    ..MappingName = "CurrentRNB "

    ..HeaderText = "Cur RNB"

    ..Width = 54

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    With aCol3

    ..MappingName = "FutureRNB"

    ..HeaderText = "Fut RNB"

    ..Width = 54

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    With aCol5

    ..MappingName = "RNBPctchg"

    ..HeaderText = "RNB % Chg"

    ..Width = 66

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "p"

    ..TextBox.Enabl ed = False

    End With

    With aCol6

    ..MappingName = "CurrentPal let"

    ..HeaderText = "Cur Pallet"

    ..Width = 56

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    With aCol7

    ..MappingName = "FuturePall et"

    ..HeaderText = "Fut Pallet"

    ..Width = 56

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    With aCol8

    ..MappingName = "DollarChangePa llet"

    ..HeaderText = "Pallet $ Chg"

    ..Width = 75

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    With aCol9

    ..MappingName = "PalletPctc hg"

    ..HeaderText = "Pal % Chg"

    ..Width = 60

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "p"

    ..TextBox.Enabl ed = False

    End With

    With aCol10

    ..MappingName = "SuggestedD IY"

    ..HeaderText = "MSRP"

    ..Width = 55

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = False

    End With

    'With aColxx

    '.MappingName = "SuggestedContr actor"

    '.HeaderText = "S/R Contr"

    '.Width = 68

    '.Alignment = HorizontalAlign ment.Right

    '.Format = "c"

    '.TextBox.Enabl ed = False

    'End With

    With aCol11a

    ..MappingName = "ReplacementCos t"

    ..HeaderText = "Store Cost*"

    ..Width = 70

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = True

    End With

    With aCol12

    ..MappingName = "StoreCost"

    ..HeaderText = "Cost w/Tint*"

    ..Width = 73

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = True

    End With

    With aCol13

    ..MappingName = "StoreRetai l"

    ..HeaderText = "Store Retail*"

    ..Width = 73

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "c"

    ..TextBox.Enabl ed = True

    End With

    With aCol14

    ..MappingName = "DesiredMar gin"

    ..HeaderText = "Margin*"

    ..Width = 55

    ..Alignment = HorizontalAlign ment.Right

    ..Format = "p"

    ..TextBox.Enabl ed = True

    End With

    With aCol15

    ..MappingName = "OmitFlag"

    ..HeaderText = "Omit*"

    ..Width = 35

    ..AllowNull = False

    ..NullValue = False

    ..Alignment = HorizontalAlign ment.Center

    End With

    '

    ' Add the GridColumnStyle s to the DataGrid's Column Styles collection.

    '

    With aGridTableStyle .GridColumnStyl es

    ..Add(aCol15)

    ..Add(aCol1)

    ..Add(aCol1a)

    ..Add(aCol2)

    ..Add(aCol3)

    ..Add(aCol5)

    ..Add(aCol6)

    ..Add(aCol7)

    ..Add(aCol8)

    ..Add(aCol9)

    ..Add(aCol10)

    '.Add(aCol11)

    ..Add(aCol11a)

    ..Add(aCol12)

    ..Add(aCol13)

    ..Add(aCol14)

    End With

    '

    ' Add the GridColumnStyle s to the aGridTableStyle .

    '

    DataGrid1.Table Styles.Add(aGri dTableStyle)

    DataGrid1.Curre ntCell = New DataGridCell(0, 10)

    'DataGrid1.Data Source.DefaultV iew.AllowNew = False

    HoldValue = DataGrid1.Item( 0, 10)


    Steve
    "Stephen Plotnick" <splotnick@grou pcbf.comwrote in message
    news:_82dnS-KX4rgq9zYnZ2dnU VZ_qqdnZ2d@giga news.com...
    >I have a checkbox in a data grid that does not change it's state until I
    >actually leave the field. I've done this routine several times in other
    >data grids without an issue.
    >
    I'm using VB.2003.
    >
    Steve
    >

    Comment

    Working...