Visual Basic Structures and Variables - vb.net

Question

I'm working on this assignment where I need to have an array inside of a structure. The array consists of imported values from a text file:
2,3
3,4
4,4
5,5
5,4
6,3
3,6
9,9
10,10
1,5
2,5
3,5
1,4
2,4
3,4
4,4
I'm getting these errors:
Severity Code Description Project File Line Suppression State
Error BC30456 'real' is not a member of 'Form1.complexNumber()'. WindowsApplication3 e:\users\gabe\documents\visual studio 2015\Projects\Lab7_Gabriel_Carnes\WindowsApplication3\Form1.vb 68 Active
Severity Code Description Project File Line Suppression State
Error BC30311 Value of type 'Form1.complexNumber' cannot be converted to 'String'. WindowsApplication3 e:\users\gabe\documents\visual studio 2015\Projects\Lab7_Gabriel_Carnes\WindowsApplication3\Form1.vb 69 Active
I've tried moving the structure to be within a method instead of at form level but it then gives an error about not being able to be within a method.
Code:
Public Class Form1
Dim Real1, Real2, Imag1, Imag2 As Double
Dim Answer As String
Private Structure complexNumber
Public real As String
Public imag As String
End Structure
' Dim strValues() As fileInport =
' IO.File.ReadAllLines("Input.txt")
Dim Values(15) As complexNumber
Dim ValuesString As String
Dim line, data() As String
Dim inputs() As String =
IO.File.ReadAllLines("Input.txt")
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblBy.Visible = False
lblMinus.Visible = False
lblPlus.Visible = False
lblTimes.Visible = False
lblAnswer.Text = ""
For i As Integer = 0 To 15
line = inputs(i)
data = line.Split(","c)
Values(i).real = data(0)
Values(i).imag = data(1)
'Values(i) = (strValues(i))
Next
End Sub
'ALL TEXT FILE VALUE CALCULATIONS
Private Sub btnFileAdd_Click(sender As Object, e As EventArgs) Handles btnFileAdd.Click
'ComplexMath.MathFunctions.Add(Values(0).real, Values(0).imag, Values(1).real, Values(1).imag)
'lstFileResults.Items.AddRange = Values(15)
ValuesString = Values.real(15)
TextBox1.Text = Values(15)
lblBy.Visible = False
lblTimes.Visible = False
lblMinus.Visible = False
lblPlus.Visible = True
End Sub
Private Sub btnFileSubtract_Click(sender As Object, e As EventArgs) Handles btnFileSubtract.Click
lblBy.Visible = False
lblTimes.Visible = False
lblPlus.Visible = False
lblMinus.Visible = True
End Sub
Private Sub btnFileMultiply_Click(sender As Object, e As EventArgs) Handles btnFileMultiply.Click
lblBy.Visible = False
lblPlus.Visible = False
lblMinus.Visible = False
lblTimes.Visible = True
End Sub
Private Sub btnFileDivide_Click(sender As Object, e As EventArgs) Handles btnFileDivide.Click
lblTimes.Visible = False
lblPlus.Visible = False
lblMinus.Visible = False
lblBy.Visible = True
End Sub
'ALL USER VALUE CALCULATIONS
Private Sub btnUserAdd_Click(sender As Object, e As EventArgs) Handles btnUserAdd.Click
Real1 = Val(txtReal1.Text)
Real2 = Val(txtReal2.Text)
Imag1 = Val(txtImag1.Text)
Imag2 = Val(txtImag2.Text)
Answer = ComplexMath.MathFunctions.Add(Real1, Imag1, Real2, Imag2)
lblAnswer.Text = Answer
lblBy.Visible = False
lblTimes.Visible = False
lblMinus.Visible = False
lblPlus.Visible = True
End Sub
Private Sub btnUserSubtract_Click(sender As Object, e As EventArgs) Handles btnUserSubtract.Click
Real1 = Val(txtReal1.Text)
Real2 = Val(txtReal2.Text)
Imag1 = Val(txtImag1.Text)
Imag2 = Val(txtImag2.Text)
Answer = ComplexMath.MathFunctions.Subtract(Real1, Imag1, Real2, Imag2)
lblAnswer.Text = Answer
lblBy.Visible = False
lblTimes.Visible = False
lblPlus.Visible = False
lblMinus.Visible = True
End Sub
Private Sub btnUserMultiply_Click(sender As Object, e As EventArgs) Handles btnUserMultiply.Click
Real1 = Val(txtReal1.Text)
Real2 = Val(txtReal2.Text)
Imag1 = Val(txtImag1.Text)
Imag2 = Val(txtImag2.Text)
Answer = ComplexMath.MathFunctions.Multiply(Real1, Imag1, Real2, Imag2)
lblAnswer.Text = Answer
lblBy.Visible = False
lblPlus.Visible = False
lblMinus.Visible = False
lblTimes.Visible = True
End Sub
Private Sub btnUserDivide_Click(sender As Object, e As EventArgs) Handles btnUserDivide.Click
Real1 = Val(txtReal1.Text)
Real2 = Val(txtReal2.Text)
Imag1 = Val(txtImag1.Text)
Imag2 = Val(txtImag2.Text)
Answer = ComplexMath.MathFunctions.Multiply(Real1, Imag1, Real2, Imag2)
lblAnswer.Text = Answer
lblTimes.Visible = False
lblPlus.Visible = False
lblMinus.Visible = False
lblBy.Visible = True
End Sub
End Class