Private Sub btn_Play1_Click 'this sub loads a picture is ok but can not play the video
img_T.Bitmap = LoadBitmap("storage/emulated/0/zzb/pic", "test.jpg") 'loads the picture no problem
MsgboxAsync(File.Exists("storage/emulated/0/zzb/moive","mhdyt.mp4"),"test") 'return msg is "True"
player1.Prepare(player1.CreateFileSource("storage/emulated/0/zzb/moive","mhdyt.mp4"))
my_Exoplayer.Player = player1
player1.Play 'can not play, no audio and video
Private Sub btn_Play2_Click 'this sub can play the video normally
Wait For (File.CopyAsync("storage/emulated/0/zzb/moive","mhdyt.mp4",File.DirInternal,"mhdyt.mp4")) Complete (Success As Boolean)
player1.Prepare(player1.CreateFileSource(File.DirInternal,"mhdyt.mp4"))
my_Exoplayer.Player = player1
player1.Play 'no problem
End Sub