Avatar billede musicchart.dk Nybegynder
21. marts 2002 - 21:11 Der er 6 kommentarer og
1 løsning

Uanset år...?

Hey Ya All...
Jeg har lavet:

Private Sub DTPicker1_Change()
If DTPicker1.Value = "04-01-2002" Then Text1.Text = "hurra"

Mit spørgsmål lyder på, om man kan skrive at det er lige meget hvilket år det er. dvs. at ... = "04-01-"uanset år"

Kan man det..?

/Bjarke
Avatar billede hoejrup Nybegynder
21. marts 2002 - 21:51 #1
Har du prøvet med følgende kode

If substr(DTPicker1.Value,1,5) = "04-01" Then Text1.Text = "hurra"

/per
Avatar billede musicchart.dk Nybegynder
21. marts 2002 - 22:56 #2
Næææ det virker sku ikke, men tak for forslaget..!
Avatar billede hoejrup Nybegynder
22. marts 2002 - 00:10 #3
var1 = DTPicker1.Value
If substr(var1,1,5) = "04-01" Then Text1.Text = "hurra"

/per
Avatar billede nih Novice
22. marts 2002 - 08:43 #4
if (day(DTPicker1.Value) = 4) and (month(DTPicker1.Value) = 1) then
  Text1.Text = "Nihs fødselsdag"
end if
Avatar billede musicchart.dk Nybegynder
22. marts 2002 - 10:27 #5
Det kan godt være at det er mig der er en "VB spasser", men Æ kan sku ik' få det til at virke... men ellers tak...!

/Bjarke
Avatar billede musicchart.dk Nybegynder
22. marts 2002 - 10:31 #6
Fik det til at virke med dette:

Private Sub DTPicker1_Change()
If (Day(DTPicker1.Value) = 4) And (Month(DTPicker1.Value) = 1) Then
  Text1.Text = "hurra"
End If
End Sub

Så Point to nih...
Avatar billede nih Novice
22. marts 2002 - 23:56 #7
takker
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
Kurser inden for grundlæggende programmering

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