[VBA]Vraag over forms en vraag over functions

[compufreak88]

Ik heb een vraagje. ik heb een form in vba

op en gegeven moment wil ik nog een form openen maar ook met mijn hoofdform kunnen werken. hoe moet ik dit doen.

ik heb al geprobeerd:

Visual Basic:

load userform1 
userform1.show

alleen daarmee krijg ik dat ik alleen met userform1 kan werken en niet met userform


En mijn tweede vraag
Ik wil een morse coder maken, en nu wil ik een functie maken die een variabele krijgt, en dan dmv select case de letter omzetten naar morse, en die moet weer terug doorgegeven worden.
hoe werkt dat nu precies.

ik weet wel dat hiet is van

Visual Basic:

private function convert (variabele) 
code 
end function.

alleen wil ik nou weten hoe het precies doorgegeven wordt

[HunterPro]

Al eens op F1 geramd of de MS KB doorgeworsteld? Dit zijn IMO vrij basic dingen namelijk

[Verwijderd]

DoCmd.OpenForm "frmproducten", acNormal
bvb

en

code:

function convert(mijnvar as string)as string
select case mijnvar
   case "bla"
       convert = "het was bla"
  case "bom"
     convert= "het was bom"
   case else
     convert ="morse niet gevonden"
end select
end function

[compufreak88]

jah ik kijk regelmatig in de help files, maar daar staat het niet duidelijk in. maar over die functie, kan ik dan gewoon in de procedure convert aanroepen of moet ik nog iets in de functie aanroep zetten?

oh en over de DoCmd.openform "frmTest", acNormal
VBA herkent die commando niet, is er ook een andere manier?

[ Voor 22% gewijzigd door compufreak88 op 29-05-2003 21:39 ]

[Verwijderd]

is dit access?
vba >> visual basic for applications hé!

[Verwijderd]

Als het Excel is dan is het juiste commando:

[Code]
UserForm1.show vbModeless
[\Code]

Maar wat extra tips:
1. Geef je formulier een normale naam.
2. Gebruik iets als gegeven hieronder. Dan kan je meerdere instanties maken van hetzelfde form en zelfs twee dezelfde forms tegelijk tonen en dan afzonderlijk van elkaar gebruiken.

[Code]
Public Sub prcShowForm()
Dim frmUserForm As UserForm1

Set frmUserForm = New UserForm1
frmUserForm.Show vbModeless
Set frmUserForm = Nothing
End Sub
[\Code]

3. Gebruik behalve de F1 toets, de objectbrowser ook je gezonde verstand. Vaak kom je dan op de meest geweldige dingen

[Edit] Om een of andere komt bij mij de layout eruit als crap. De tags werken niet, ik zal wel weer iets verkeerds doen. Oftewel RTFM [\edit]

[ Voor 12% gewijzigd door Verwijderd op 30-05-2003 11:23 ]