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??
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??