On looking at the rest of the Camera class, I'm not sure that your callback code with do what you are expecting, as there is no sub defined to call.
You may need to create a callback using :
Callback = Jo.CreateEventFromUI("android.hardware.Camera$PreviewCallback","VidCallback",Null)
Then add a sub to handle it:
Sub VidCallback_Event (MethodName As String, Args() As Object) As Object
End Sub