In meanwhile, you can use this code to loop your video:
B4X:
Sub Globals
Dim vv As VideoView
End Sub
Sub Activity_Create(FirstTime As Boolean)
vv.Initialize("vv")
vv.LoadVideo(File.DirDefaultExternal, "test.3gp")
vv.Play
End Sub
Sub vv_Complete
vv.Play 'Loop video
End Sub