vbscript: Add additional types for stack_pop_bool.

I have found some scripts where comparisons that use floats and OLECOLOR directly fail. For example:

If Light005.State Then
   ' State is a float V_R4
End If

If Light005.Colorfull Then
   ' Colorfull is an OLECOLOR VT_UI4
End If

This is because stack_pop_bool does not handle VT_R4 and VT_UI4 and returns E_NOTIMPL.

This adds additional types to stack_pop_bool similar to VARIANT_Coerce.

Fixes https://bugs.winehq.org/show_bug.cgi?id=54731