yes perhaps you are right but misconfiguration of my VB6 i dont have the help files on this machine.
You say as long as the control raises it so say i have nine command buttons each one would have to have the bove code in to raise the mouse up and mouse down events?
Of so if i create these two subs(events) mouse down and mouse up will they be triggered every time the mouse is clicked and the mouse is releases respectively?
a ha i was looking at one of my old posts as i am now in the stages of implementing a function that when the key is held down a different function occurs to when it is just pressed, and i have just noticed that you posted some code to me Jeff. I know i am getting annoying but please bare with me...
can any of you tell me what is the difference between Form_Load and form_initialize events, when to use each one and at waht stage of the lifecycle each one is activated?
with that function you gave me, whenever a form is opened using that function i can not properly close them.
For instance i have a button on all my forms called end which does the following
frmCurrent.hide
frmNext.show
but this button doesnt actaully close the form when it is opened via your...
Ok that is great, what a function!!!!!
thank you so much for all your help it was great, im not going to be able to take credit for this so i will add a note within the function stating where i got it from.
Thnk you so much you have saved me so much work.
Have a star and if i already given...
Forget my last post i changed the whole array to a string and it works!!!!!!!!!!!!!!!!!!
thank you so much that function will save me a lot of time.
Could i please ask one last favour, i have tryed to understand how that function works but i just cant get my head arround it. i dont suppose it...
one thing i dont want to make all the elements of the array strings so can i decalare just one of the elements element two as a string and the rest as variants or is this not possible.
'In general heading
Dim Shortcut1(3)
'then the following function assigns the values
Public Sub AddShortcut(ShortcutNumber As Integer, Name As String, frmName As String)
Select Case ShortcutNumber
Case 1: Shortcut1(0) = ShortcutNumber
Shortcut1(1) = Name
Shortcut1(2)...
thanks for the code it looks impressive and i am sure is great buti have inserted your function into my module and called it by the following:
FormByName(Shortcut1(2)).Show
But i get a mismatch error occur and i cant figure out why, but then i dont really understand how your function works.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.