Auto populate a subform

[keiath]

Hi Guys



I have this code

Private Sub CboStock_Change()
Me.TxtProductD.Value = Me.CboStock.Column(1)
Me.TxtPackQ.Value = Me.CboStock.Column(2)
Me.TxtPrice.Value = Me.CboStock.Column(3)
Me.TxtVAT_.Value = Me.CboStock.Column(4)
End Sub

and the table query:=
SELECT [Stock Codes].[Product Code], [Stock Codes].[Product Description], [Stock Codes].[Pack Size], [Stock Codes].[Sell Price]
FROM [Stock Codes];

When I select the product code (CboStock), the product description (Me.TxtProductD.Value = Me.CboStock.Column(1)) and pack size (Me.TxtPackQ.Value = Me.CboStock.Column(2)) auto populate but the last two the price and VAT are not populating, Any ideas why?

Thanks

[Missinglinq]

You have four Fields in the Combobox, but you're using

Me.CboStock.Column(X)

where X is 1-4. The index is Zero-based, meaning it starts with zero, so with 4 Fields it should be 0-3.

Linq ;0)>

[keiath]

0 is actually the column for the stock code, hence the reason the first two 1 and 2 are showing the correct information

[Xipooo]

Two things...

First, make sure you "Column Count" property is set correctly on your combobox. It should be set to 4. You need all four fields from your query to be in your combobox. Just having them in the row source itself doesn't do the job. If you need to hide any columns, go to the "Column Widths" property and set their column widths to 0".

Secondly, Linq is right. The "Column" property is a base 0 array. The first column (Product Code), is the column 0. Product Description is column 1... etc.
So, "Me.TxtVAT_.Value = Me.CboStock.Column(4)" can't possibly be correct because you don't have a 5th column in your combobox rowsource.

[keiath]

Hi Sorry meant to say thanks that solved the problem