Print side | Luk vindue

Microsoft Access 2019 Programming by Example

Udskrevet fra: Dansk Access Forum
Kategori: Hjælp til Access
Forum navn: VBA / Makro
Forum beskrivelse: Spørgsmål vedr. den programmeringsmæssige del af Access
Web-adresse: https://www.accessforum.dk/forum_posts.asp?TID=146
Udskrevet den: 24-11-2024 kl. 06:11


Emne: Microsoft Access 2019 Programming by Example
Besked fra: kimidk1
Emne: Microsoft Access 2019 Programming by Example
Posteringsdato: 09-01-2021 kl. 19:29
Hej

Jeg er i gang med at løbe Microsoft Access 2019 Programming by example igennem men er løbet ind i et problem jeg ikke kan gennemskue.
I kapitel 8 er jeg færdig med at indtaste eksemplet der skal rette i lønninger for medarbejdere. Men jeg bliver standset af en fejl:



Programmet stopper i den nedenfor viste kode:

Sub AddEmployee(empLast As String, empFirst As String, _
empSalary As Currency)
    With emp
        .ID = SetEmpID                          ( det er her fejlet er relateret til)
        .Lastname = empLast
        .FirstName = empFirst
        .salary = CCur(empSalary)
        If .salary = 0 Then Exit Sub
        CEmployee.Add emp
    End With
        
End Sub

Der er tidligere i eksemplet blevet gjort opmærksom på at ID er oprettet som "Read only", men jeg går ud fra at jeg misser et eller andet.

Hvis der er nogen der kender bogen og som kan gennemskue hvor jeg fejler, så er al hjælp velkommen da jeg er kørt fast

Mvh.

Kimidk1



Print side | Luk vindue