Solved

VB 6.0 MaskEdBox 6.0 Copy/Paste with Right Mouse Button!!

Posted on 1998-11-20
6
310 Views
Last Modified: 2008-02-01
Anyone run into this before?

I have two MaskEdBoxes on a form both with the following mask ">CCCCCCCCCC".  I enter some text in the first box, highlight it using the mouse and copy it using the Right Mouse button and clicking on Copy.

I go to the second box and right click then click on paste.  The text is there but when I leave the box the text disappears.
0
Comment
Question by:tward
6 Comments
 
LVL 1

Expert Comment

by:csalves
ID: 1445884
Hi,


You need to set the property ClipMode = "Exclude Literals"
bye,
0
 
LVL 7

Author Comment

by:tward
ID: 1445885
Did you try your answer?  It doesn't work.
0
 
LVL 2

Expert Comment

by:KJHDI12
ID: 1445886
It's a very annoying bug (Very simular to the newest IE4 security bug).

The easyest solution would to stop the user from pasting.

Mr. Fixit
0
3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

 
LVL 7

Author Comment

by:tward
ID: 1445887
Not really a good answer...  Looked in the Knowledge base and couldn't find anything.  Will put it out there to see if anyone has a better answer...

How do you stop the pasting with the right mouse button anyway?  I saw this one time but can't remember the control or the property I was dealing with.

Another note is that if I do the copy/cut/paste using the Ctrl-V,C,X or Shift-Ins then it works just fine!!
0
 
LVL 13

Accepted Solution

by:
Mirkwood earned 100 total points
ID: 1445888
Dim m_inchange As Boolean
Private Sub MaskEdBox2_Change()
    If Not m_inchange Then
        m_inchange = True
        On Error Resume Next
        MaskEdBox2.Text = MaskEdBox2.Text
        m_inchange = False
    End If
End Sub
0
 
LVL 7

Author Comment

by:tward
ID: 1445889
Crazy to have to do things like that but it does work!

Thanks...
0

Featured Post

ScreenConnect 6.0 Free Trial

Explore all the enhancements in one game-changing release, ScreenConnect 6.0, based on partner feedback. New features include a redesigned UI, app configurations and chat acknowledgement to improve customer engagement!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

831 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question