---

Hej alle

Jeg har et lille program med 2 forms
jeg ønsker at oprette en konstant som indeholder en værdi (navn) som kan
bruges af begge forme.

- hvordan gør man det ?

Jeg havde forestillet mig noget lign. (defineret i et modul kaldet PrgNavn)

----------------------------------------------------------------------------
-------
Option Explicit

Const PrgNavn As String = "Denne værdi bliver tildelt konstanten PrgNavn"
----------------------------------------------------------------------------
-------

og derefter følgende i form.load på formen FrmHoved

----------------------------------------------------------------------------
-------
Private Sub Form_Load()
FrmHoved.Caption = PrgNavn
End Sub
----------------------------------------------------------------------------
-------

Men ved kørsel af dette uhyre simple program ... ... får jeg meddelsen
"variable not defined" (PrgNavn)

Er der en der vil forbarme sig over mig og skrive hvordan dette gøres
korrekt ?

På forhånd tak

Neo.dk

P.s. behøver jeg at nævne at jeg er nybegynder

---

Hei Neo

Public Const PrgNavn As String = "Denne værdi bliver tildelt konstanten
PrgNavn"

HTH. Beste hilsen Harald

"Neo.dk" <neo___dk@hotmail.com> skrev i melding
news:3c9ef5be$0$87759$edfadb0f@dspool01.news.tele.dk...
> Hej alle
>
> Jeg har et lille program med 2 forms
> jeg ønsker at oprette en konstant som indeholder en værdi (navn) som kan
> bruges af begge forme.
>
> - hvordan gør man det ?
>
> Jeg havde forestillet mig noget lign. (defineret i et modul kaldet
PrgNavn)
>
> --------------------------------------------------------------------------
--
> -------
> Option Explicit
>
> Const PrgNavn As String = "Denne værdi bliver tildelt konstanten PrgNavn"
> --------------------------------------------------------------------------
--
> -------
>
> og derefter følgende i form.load på formen FrmHoved
>
> --------------------------------------------------------------------------
--
> -------
> Private Sub Form_Load()
> FrmHoved.Caption = PrgNavn
> End Sub
> --------------------------------------------------------------------------
--
> -------
>
> Men ved kørsel af dette uhyre simple program ... ... får jeg meddelsen
> "variable not defined" (PrgNavn)
>
> Er der en der vil forbarme sig over mig og skrive hvordan dette gøres
> korrekt ?
>
> På forhånd tak
>
> Neo.dk
>
> P.s. behøver jeg at nævne at jeg er nybegynder
>
>
>
>

---

"Harald Staff" <harald.staff@nrk.no> skrev i en meddelelse
news:a7muf7$ke9$1@oslo-nntp.eunet.no...
> Hei Neo
>
> Public Const PrgNavn As String = "Denne værdi bliver tildelt konstanten
> PrgNavn"
>
> HTH. Beste hilsen Harald


Woohoo det virker

Tak skal du have Harald

Neo.dk

---

"Neo.dk" <neo___dk@hotmail.com> skrev i en meddelelse
news:3c9f0038$0$87812$edfadb0f@dspool01.news.tele.dk...
>
> "Harald Staff" <harald.staff@nrk.no> skrev i en meddelelse
> news:a7muf7$ke9$1@oslo-nntp.eunet.no...
> > Hei Neo
> >
> > Public Const PrgNavn As String = "Denne værdi bliver tildelt konstanten
> > PrgNavn"
> >
> > HTH. Beste hilsen Harald
>
>
> Woohoo det virker

....men hvorfor ikke bruge den indbyggede App.Title?

myForm.Caption = App.Title

--
mvh
Jens Vestergaard
www.railsoft.dk

---

> ...men hvorfor ikke bruge den indbyggede App.Title?
>
> myForm.Caption = App.Title
>
> --
> mvh
> Jens Vestergaard
> www.railsoft.dk

Hej Jens

Et kort svar ... fordi jeg ikke anede at der var noget der hed det !

- men det lyder meget interessant - kan du beskrive det lidt nærmere ?

Sidst jeg brugte basic hed det gwbasic ... såøhh jeg er sgu ik så god
til det her ... endnu da.

Mvh Neo.dk

---

"Neo.dk" <neo___dk@hotmail.com> skrev i en meddelelse
news:3c9f4060$0$39547$edfadb0f@dspool01.news.tele.dk...
> > ...men hvorfor ikke bruge den indbyggede App.Title?
> >
> > myForm.Caption = App.Title
> >
> > --
> > mvh
> > Jens Vestergaard
> > www.railsoft.dk
>
> Hej Jens
>
> Et kort svar ... fordi jeg ikke anede at der var noget der hed det !
>
> - men det lyder meget interessant - kan du beskrive det lidt nærmere ?
>

App-objektet rummer forskellige 'egenskaber', hvoraf du kan sætte nogle af
dem i din VB i menuen Project --> Project Properties.

App.Title er en af dem, du frit kan sætte sammen med bl.a.:
App.LegalCopyright
App.CompanyName
App.Comments

App.Path er read-only og indeholder stien til din EXE, når den kører som
sådan.

App.Major, App.Minor og App.Revision indeholder tilsammen versionnummeret på
din app.
(myVers = App.Major & "." & App.Minor & "." & App.Revision)

App.PrevInstance er read-only og kan bruges til at bestemme, om der allerede
kører en instance af ens EXE på maskinen:

If App.PrevInstance Then
MsgBox "Dette program kører allerede på din maskine"
'kode til at afslutte
EndIf

Der er lidt mere at eksperimentere med. Gue' fornøwls

--
mvh
Jens Vestergaard
www.railsoft.dk

---

> App-objektet rummer forskellige 'egenskaber', hvoraf du kan sætte nogle af
> dem i din VB i menuen Project --> Project Properties.
>
> App.Title er en af dem, du frit kan sætte sammen med bl.a.:
> App.LegalCopyright
> App.CompanyName
> App.Comments
>
> App.Path er read-only og indeholder stien til din EXE, når den kører som
> sådan.
>
> App.Major, App.Minor og App.Revision indeholder tilsammen versionnummeret
på
> din app.
> (myVers = App.Major & "." & App.Minor & "." & App.Revision)
>
> App.PrevInstance er read-only og kan bruges til at bestemme, om der
allerede
> kører en instance af ens EXE på maskinen:
>
> If App.PrevInstance Then
> MsgBox "Dette program kører allerede på din maskine"
> 'kode til at afslutte
> EndIf

Hej Jens

Tusind tak for din besvarelse - det var lige netop det jeg skulle bruge

Neo.dk