Sub InitializeCamera(front As Boolean)
If llc.IsInitialized Then llc.StopPreview
llc.Initialize(PreviewPanel, "llc", front)
llc.Preset = llc.PRESET_640x480 '.PRESET_LOW
myVideoRec.Initialize(Me,"myVideoRec",llc)
llc.StartPreview
currentPreset = llc.Preset
ConfigureCamera
CorrectPreviewPanel
End Sub