Erro esquesito...

Snow #41

Power Member
tou a desenvolver um programa em Visual Basic 6.0 e da-me um erro quando tou a criar uma estrutura de ficheiros...

criei o Type:
Type registo
nome As String * 15
idd As Integer
End Type

tb ja criei as variaveis:
Dim regist As registo
Dim nres As Long

e no form_load tenho isto:
Private Sub Form_Load()
Text2.Enabled = False
Image3.Enabled = False
Image1.Enabled = False
Open "J:\Escola\BP\registo.dat" For Random As #1 Len = Len(regist)
nres = 1
End Sub

Da-me erro na parte a Negrito e Itálico.

O k se passa??
 
Back
Topo