31. januar 2003 - 13:22Der er
2 kommentarer og 1 løsning
Test på valg i gruppeboks
Jeg har en formular med en gruppeboks med 3 alternativknapper, jeg har ikke nogen standard indstilling, dvs ingen af de tre knapper er trykket ind. Mit problem er hvordan kan jeg teste på om en af knapper er valgt, før jeg vælger at gå til Ny Post ved tryk på knappen NyPost. Jeg har forsøgt nedenstående uden held. De tre knapper gemmer værdien 1 – 3 i en tabel Apparatkategori.
Private Sub NyPost_Click()
If Me.Alternativknap53.OptionValue = 1 OR Me.Alternativknap55.OptionValue = 2 OR_ Me.Alternativknap57.OptionValue = 3 Then
DoCmd.GoToRecord , , acNewRec
Else
Msgbox "Du skal vælge en kategori", vbCritical + vbOKOnly, "Apparatkategori" End If
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Du skal indsætte koden i Formularens VedAktuel hændelse (OnCurrent). Derefter skal du indsætte koden i selve rammen, der indeholder dine alternativknapper. F.eks:
If Me.NewRecord And IsNull(Me.Ramme1) Then MsgBox "Du skal vælge en kategori" End if
Så får du en MsgBox hvis kriterierne er opfyldte.
IsNull(Me.Ramme1) skal naturligvis flyttes til en anden procedüre afhængig af, hvordan din formular er skruet sammen, f.eks FørOpdatering (BeforeUpdate).
Følgende kode virker på min kommandoknap til ny post
Private Sub Kommandoknap59_Click()
If IsNull(Me.Ramme50) Then Msgbox "Du skal vælge en kategori", vbCritical + vbOKOnly, "Apparatkategori"
Else DoCmd.GoToRecord , , acNewRec
End If
End Sub
så point til mugs, tak!
mvh cuac
Synes godt om
Ny brugerNybegynder
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.
