VB problem
------=_NextPart_000_0119_01C0B3D6.555CEB20
charset="iso-8859-1"
Hi all
I know that this mailing list is for UE but I have a VB problem
If I make a text and then I wan't that when you right click on a text =
box a PopUpmenu woud apear.
I used this code:
Private Sub Form_MouseDown (Button As Integar,shift As Integar, x As =
Single, y As Single)
if Button =3D 2 then form1.popupmenu name of menu
end sub
This works, but when you right click it first show the defalult =
popupmenu and then when you right click again it shows the menu you have =
chosen.
Help mee hear.
Jan=20
------=_NextPart_000_0119_01C0B3D6.555CEB20
charset="iso-8859-1"
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 5.50.4522.1800" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
but I have=20
a VB problem</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>If I make a text and then I wan't that =
when you=20
right click on a text box a PopUpmenu woud apear.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>I used this code:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Private Sub Form_MouseDown (Button As =
Integar,shift=20
As Integar, x As Single, y As Single)</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>if Button =3D 2 then form1.popupmenu =
name of=20
menu</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>end sub</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>This works, but when you right click it =
first show=20
the defalult popupmenu and then when you right click again it shows the =
menu you=20
have chosen.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Help mee hear.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Jan </FONT></DIV>
------=_NextPart_000_0119_01C0B3D6.555CEB20--
|
Not Categorized, Please Help
|
|
