Avatar billede qurzyx Nybegynder
01. august 2003 - 11:54 Der er 17 kommentarer

if-betingelser i sin rapport?

Kan det passe at man ikke kan lave if-betingelser i sin rapport?

Jeg har dette:

If Spg = "1" Then
        BilledeNoMark.Visible = True
        BilledeNoMark.Picture = "C:\BA\gfx\gray.bmp"
    End If

Det virker som en formular, men når det puttes ind i en rapport kommer fejlmeddelsen:


Runtime 2427:
Du har indtastet et udtryk, der ingen værdi har
Avatar billede overchord Nybegynder
01. august 2003 - 12:09 #1
Hvor ligger det i rapporten? OnLoad eller hvad?
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:10 #2
Report_open
Avatar billede overchord Nybegynder
01. august 2003 - 12:12 #3
Det er fordi du mangler en Else tror jeg, eller simpelthen fordi spg ikke har nogen vaerdi i posten.
Saa laeg denne kode i on NoData

Private Sub Report_NoData(Cancel As Integer)
MsgBox ("No records found for the specified date range")
Cancel = True
End Sub
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:12 #4
Nu sat jeg den onload; så kommer fejlmeddelsen ikke, men if-betingelse virker ikke... der sker i hvert fald ikke noget
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:14 #5
Der er også værdi i posten...
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:15 #6
og feltet spg kan godt ses med værdien 1 i sig, men betingelsen gå ikke op
01. august 2003 - 12:15 #7
Der er ikke nogen Load-hændelse på en rapport (kun Open)

Prøv i stedet at placere koden på OnFormat på den sektion, som BilledNoMark er placeret på.

/Thomas
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:17 #8
Funger stadig ik
01. august 2003 - 12:20 #9
Prøv denne:

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Spg = "1" Then
    BilledeNoMark.Visible = True
    BilledeNoMark.Picture = "C:\BA\gfx\gray.bmp"
else
    BilledeNoMark.Visible = False
    BilledeNoMark.Picture = ""
End If
End Sub
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:23 #10
Der sker intet
01. august 2003 - 12:27 #11
Og du er sikker på, at billedet hedder: BilledeNoMark og at dit Ja/Nej-felt hedder Spg?
01. august 2003 - 12:29 #12
Og er begge felter placeret i detaljesektionen?
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:46 #13
ja...
Avatar billede qurzyx Nybegynder
01. august 2003 - 12:52 #14
Den kan ikke antage værdier (1,2,3) men derimod kun isnull(spg).. Mærkelig??
Avatar billede overchord Nybegynder
01. august 2003 - 13:06 #15
Er spg dimensioneret som integer eller string?
Avatar billede qurzyx Nybegynder
01. august 2003 - 13:07 #16
string
Avatar billede rosco Novice
04. august 2003 - 20:52 #17
Kunne der bruges Case her, f.eks

Select Case Me.Spg
      Case 1
            Me!BilledeNoMark.Visible = True
            Me!BilledeNoMark.Picture = "C:\BA\gfx\gray.bmp"
      Case Else
            Me!BilledeNoMark.Visible = False
            Me!BilledeNoMark.Picture = ""
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester