Bonjour,
je traduit actuellement un programme en vb6 en vb.net et je n'arrive pas
à coder la lecture et l'enregistrement d'un fichier

Voici le code en vb6

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Type enregistrement
    SAVETABREPONSE(1 To 9, 1 To 9) As Integer
End Type
Private MyRecord As enregistrement
Dim qnr As Integer
 
Sub enregistrement()
MyRecord.SAVETABREPONSE(x, y) = TABREPONSE(x, y)
qnr = FreeFile
Open App.Path & "\enregistrement.sdk" For Random As #qnr Len = Len (MyRecord)
Put #qnr, 1, MyRecord
Close #qnr
end sub
Ma deuxième question est comment traduire l'evenement click d'un textbox ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Private Sub Text1_Click(Index As Integer)
Merci d'avance