Private Sub Form_GotFocus() ve
Private Sub Form_Load()

ikinci bölge için aynı kodu tekrar yazmışsın, Aynı olay iki kere yazılmaz. Aşağıdaki kodu dene

Private Sub calistigisirket_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket777.Visible = False
Me.Etiket778.Visible = True
End Sub

Private Sub Form_GotFocus()
Me.Etiket777.Visible = True
Me.Etiket778.Visible = True
End Sub

Private Sub Form_Load()
Me.Etiket777.Visible = False
Me.Etiket778.Visible = False
End Sub

Private Sub calistigibolge_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket777.Visible = True
Me.Etiket778.Visible = False
End Sub