problem with opening file
ok i have it all in a subprocedure and it opens now thanks
but i have to perform a calculation on dba and rest
it s giving me a type mismatch error
txtView.Text = txtView.Text + name + " " + sex + " " + dba + " " + rest + vbCrLf
I dimmed it the same where it is called so Im a little lost
Private Sub Spot(name As String, sex As String, dba As Integer, rest As Integer)
txtView.Text = ""
txtView.Enabled = True
Open "a:\THRFILE.DAT" For Input As #1
Do While Not EOF(1)
Input #1, name
Input #1, sex
Input #1, dba
Input #1, rest
txtView.Text = txtView.Text + name + " " + sex + " " + dba + " " + rest + vbCrLf
Loop
Close #1