Do you have a space between WhereStr and ORDER BY?

Your 'WhereStr' is not defined anywhere.  (No Dim WhereStr)

Then for your combobox... in Design Mode, Go to the Format Tab, set the spacing in the column width property.  Should be something like: 0"; 1.5"

-Raymond

Kevin Kevin, I checked by retyping it in there and I guess there was a space because this time I made sure I placed a space in there after the _ and still nothing.

Raymond Raymond, I watched the video over once again and  there was no mention of a Dim WhereStr or even in the handbook. Funny thing is it all worked before I placed in all the RefreshProductList items. I even went back and removed them and nothing still appeared in the ProductList box.

Ken
Just went through that video, and you are right, the WhereStr wasn't mentioned. Since it's not used, you could probably delete that line but I don't think it would matter.

The only things I noticed different were that in the video, Richard had the rowsource pointed to "ProductVendorNewPricingQ" until the 10:42 point where he switched it to ProductT. You have VendorProductUpdatingQ.

If that's not the issue, then I would recommend putting your SQL into a string and either msgbox it or, if you use Richard's Status function, status it, so you can see what is going on.

Details

Dim S as String
S = "SELECT " & TopStr & " ProductID, ProductCode, ProductName, " & _
     "Category, LastUpdated, UnitPrice, NewPrice, Profit, IsActive " & _
     "FROM ProductT" &
     WhereStr &
     "ORDER BY " & SortStr & ";"

MsgBox S

ProductList. RowSource = S

Copy

Guys, I changed around the SQL to match pretty much what I saw on the video for Lesson 10.  I had to guess that the name was ProductName on the video as well because it never completely showed itself. I got the ProductList filled again by starting over from scratch, and then, after putting in the last bit of code for the Sortby area, it vanished again. Donald, I saw what you shared as code to place in, but I was not sure what truly had to be replaced or where. There has to be something in this coding that I am missing or have wrong, even though I am not getting any kind of area message. When I did have it all there, none of the top 3 buttons works even when I placed the RefreshProductList the AfterUpdate areas.

Have a look at the ORDER BY line. You have extra quotes.

    "ORDER BY " & SortStr & ";"

Ken, sorry, I should have been more concise. Guilty of "seeing it in my head" and not putting it all in the post.

I think Kevin's last post should get your code straightened around.

As for the top 3 selectors not working, did you change the control names in the form to match the names Richard used in the VBA. In your previous screen shot, you had renamed them to names more like what Richard now uses:

Previous: HowManyCbo
Now: HowMany

Previous: SortByCbo
Now: SortBy

Previous: SortHowCbo
Now: SortHow

Again, either change those names back to what you had in your original code, or make sure that you've renamed the comboboxes in the form.

Kevin Hi Kevin, I just followed what Richard had in the video and in the handbook. I tried to remove one of the quote marks on either side of the semi-colon, and it instantly went to red and an error message. I have attached a screenshot from the handbook for you to see.

Donald Hi Donald, I did go back and check, and I did change the original names to not have the cbo behind any of them. I was trying to type it exactly like Richard had in the video to see if that was why, but it had no effect. I really feel that this entire mess has something to do with this sorting box. Before I added that part, everything was in there. Going to try to see if my hunch is correct, and then if it is, I will know where the real problem is coming from. I think Richard is right. I have gremlins in the machine.

New Thread: New Chat String for Lesson 10