Dim selectedFrame = (From SF In TOCFrames Where SF!Model = cboModel.Text Select SF!Model, SF!Colour, SF!PROS_Design, SF!PROS_Description) For Each Item In selectedFrame If Not IsDBNull(Item.Colour) Then txtColour.Text = Item.Colour Else txtColour.Text = "" End If If Not IsDBNull(Item.PROS_Design) Then txtDesign.Text = Item.PROS_Design Else txtDesign.Text = "" End If If Not IsDBNull(Item.PROS_Description) Then txtDescription.Text = Item.PROS_Description Else txtDescription.Text = "" End If Next
Error 55 'Item' is not declared. It may be inaccessible due to its protection level.
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)