VB 첨자 사용 오류가 뜨는데 어떻게 해결하나요?

아래 코드에서 첨자 사용 오류가 뜨는데 어디가 잘못됐는지 모르겠어요.
해결 방법을 알려주세요.

Private Sub Command1_Click()
If Text2.Text = Then: Exit SubText1 = Text1 & Hacker -- & Text2 & vbCrLf
Form2.Sock(Split(Split(Label1.Caption, :)(1), )(0)).SendData #Text# & Text2
Text2.Text = End Sub