Avatar billede hubertus Seniormester
02. marts 2008 - 17:15 Der er 14 kommentarer og
1 løsning

overførsel af tekst-strenge mellem to userforms.

I http://www.eksperten.dk/spm/820806 fik jeg hjælp til at overføre en streng til en ny userform. Men jeg har behov for en lille udvidelse. Jeg har en userform1 med en optionbutton, når brugeren markere den, så åbnes en ny userform2, hvor der skal træffes nogle valg i nogle checkboxe. Disse valg resultere i en tekststreng, som jeg skal have ført tilbage til userform1.

Userform1
Private Sub optUdstyr_Click()
Load FrmUdstyr
FrmUdstyr.Show
End Sub

Userform2

Private Sub cmdok_Click()
    Dim var As String
    If chktools1.Value = True Then var = "xxx"
    If chktools2.Value = True Then var = "YYY"
    osv.
      var skal føres tilbage til userform1
End Sub

Nogle Ideer?
Avatar billede word-hajen Nybegynder
02. marts 2008 - 17:21 #1
userform1
*************
Private Sub optUdstyr_Click()
Dim objForm as FrmUdstyr
dim strText as string

set objForm as new FrmUdstyr

with objForm
    .show
    select case true
        .chkTools1.Value
            strText = "xxx"
        .chkTools2.Value
            strText = "yyy"
    end select
End with

End Sub
*********

Frmudstyr
************
private sub cmdok_click
    me.hide
end sub
Avatar billede hubertus Seniormester
02. marts 2008 - 17:50 #2
Du er godt nok hurtig - super

jeg får en compile error:
statements and labels invalid between Select case and first case.
opstår i linien

.chkTools1.Value

hvad er forkert?
Avatar billede word-hajen Nybegynder
02. marts 2008 - 18:46 #3
Du skal lige skrive Case foran de to x .chkTools
Avatar billede hubertus Seniormester
02. marts 2008 - 19:40 #4
Tak for hurtig hjælp ;O))- lægger du et svar?
Avatar billede word-hajen Nybegynder
02. marts 2008 - 19:47 #5
Velbekomme :-)
Avatar billede hubertus Seniormester
06. marts 2008 - 18:20 #6
Hej igen

Jeg fundere lidt over, hvad gør man, hvis brugeren markere 2 checkboxe?
Avatar billede word-hajen Nybegynder
06. marts 2008 - 21:43 #7
Aj, jeg havde da slet ikke tænkt på, at det var checkboxe (af en eller anden årsag tænkte jeg optionbuttons i mit hoved).

Lav Select statement om til if-sætninger. Nu ved jeg ikke, hvad de forskellige "tekstresultater" skal bruges til, men du skal nok have bygget noget andet sammen omkring dine tekster, for ellers overskriver en "afhakket" tekstboks jo bare den forrige værdi, der er sat.
Avatar billede word-hajen Nybegynder
06. marts 2008 - 21:46 #8
Men skal du egentlig kun bruge én tekst eller hvad?
Avatar billede hubertus Seniormester
06. marts 2008 - 21:48 #9
Teksten fra de enkelte resultater skal sættes sammen til en streng.
Avatar billede hubertus Seniormester
06. marts 2008 - 22:02 #10
Der er tale om en del checkboxe, som hverisær er udtryk for en række ting, som skal være i værktøjskassen. Sammensætningen skal kunne kobineres på kryds og tværs. Slutresultatet er en tekststreng, som repræsentere indholdet. Du skal blot se det som et eksempel. Jeg har brug for metoden i forskellige sammenhænge.
Avatar billede word-hajen Nybegynder
06. marts 2008 - 22:12 #11
Okay - så lav select statement om til if-sætninger.
Avatar billede hubertus Seniormester
07. marts 2008 - 06:42 #12
min løsning ser så således ud:

If chktools1.Value = True Then tekst1 = "xxx"
If chktools2.Value = True Then tekst2 = "YYY"
osv.

tekst1 og tekst2 kan så flettes sammen i en ny streng. Er det den optimale løsning?
Avatar billede word-hajen Nybegynder
07. marts 2008 - 11:33 #13
Du kunne også gøre strikke strengen sammen med det samme:

...then tekst1 = tekst1 & "YYY"

osv.
Avatar billede hubertus Seniormester
07. marts 2008 - 12:33 #14
Det er fint :O)  Tak for hjælpen.

God weekend
Avatar billede word-hajen Nybegynder
07. marts 2008 - 18:20 #15
Velbekomme - og i lige måde :-)
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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