Opção estrita Em caso de falta de ligação tardia

Alguém pode ajudar-me a corrigir este erro? ' *** O2AreaCts If StrComp(SF6StdData.Current("O2AreaCts").ToString, "") = ... And Dim SF6StdData As BindingSource = New BindingSource () preciso reescrever o código para que ele não tenha erros.