Gå til innhold

Public Function og error


Anbefalte innlegg

Hallo

 

Har en modul her med denne koden:

Public Function addline(tekst As Double)
Form3.Text1.Text = Form3.Text1.Text & vbNewLine & tekst
End Function

og i en annen form har jeg denne koden:

addline ("hallo")

Dette gir type mismatch. Hva er galt? Klarer ikke å se det :dontgetit:

Endret av jonas22282460
Lenke til kommentar
Videoannonse
Annonse
Det gjorde det virkelig :thumbs:

 

btw, noen som vet hva koden doevents gjør?

Som det står i hjelpefilen så returnerer DoEvents kontrollen til windows slik at events og tastetrykk i applikasjonen kan utføres.

 

F.eks. kan lage en Cancel knapp som avbryter en funksjon på denne måten.

Lenke til kommentar
  • 2 uker senere...

eehh.. fungerer dette?? :cry:

 

i VB6.0 er jeg nesten 100% sikker på at dette IKKE vil kompilere, fordi du her har en funksjon som ikke retunerer en verdi, enten må det gjøres slik :

 

Public Function addline(tekst As String) As Double
  Form3.Text1.Text = Form3.Text1.Text & vbNewLine & tekst
End Function

 

eller slik :

Public Sub addline(tekst As String)
  Form3.Text1.Text = Form3.Text1.Text & vbNewLine & tekst
End Function

Lenke til kommentar

doevents metoden kan brukes som en billig erstatning av multi-threading (dvs. at én applikasjon kjører flere tråder samtidig).

 

Hvis du for eks. skriver dette :

For i = 0 To 1000000 Step 1
   DoEvents
   Debug.Print i & " + " & i & " = " & CStr(i + i)
Next i

 

Så vil ikke programmet ditt "henge" seg opp mens den utfører For-løkka, den vil også prøve å gjøre andre ting, som f.eks å tegne formen din, etc.

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...