This thread is for discussions of Create Application Tutorial.

You have this line of code:

   hComboBox = FindWindowEx(hMsgBox, 0, "ComboBoxEx32", "")

I tried very similar code (essentially the same), but it did not work:

   lhwnd = FindWindowEx(fhwnd, 0, "ThunderCommandButton", "")

When I change the empty string to vbNullString, it works:

   lhwnd = FindWindowEx(fhwnd, 0, "ThunderCommandButton", vbNullString)

I'm assuming you copied and pasted the code into this forum from code that worked.  Any ideas as to why it worked for you and not me using the empty string?  (I'm in VB6 sp5 on XP pro 2002 sp1)

James code works fine for me, Excellent Job.