I need to capture the Control - C event and I'm not sure how to do it. I'm currently capturing the Return/Enter event. Is there a way to do this? My code is below.

Private Sub lstResults_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then 'Return/Enter key
        lstResults_DblClick (False)
    ElseIf 'this is where I need to capture the Control + C event to enable users to copy.
    End If
End Sub

Once I've trapped this event, how can I allow the user to actually copy a specified variable?

I hope this is enough info to enable you to help me. If not I can try to better describe what I'm trying to do.

Thanks in advance.

I don't understand why you're trying to reinvent the wheel. If the user highlights said variable and presses Control+C, it WILL copy the variable into the buffer. No need to program anything.

Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

Assuming there is really a reason you what to do this, just check for:

(KeyCode = vbKeyC) And ((Shift and acCtrlMask) > 0)

I assume you need this for getting the data into a variable in your code not into the copy/paste buffer for the user to use.

Of course another reason might be that you want to automatically copy all of the text into the copy/paste buffer. This would be a nice feature since when a field is clicked (rather than tabbed into) it doesn't automatically select all of the text. If this is what you want to do, then the code for when a Ctrl+C is pressed is:

Me.field.SelStart = 0
Me.field.SelLength = Len(Me.field)

BTW, you can't use the GotFocus event to make sure all of the text gets selected when a user clicks into a field. The click somehow overrides the GotFocus as far as selecting text goes. Though you might be able to trap the MouseDown or MouseUp events to do this. I've just given up trying to make this work the way I want.

You might also be wanting to use this to prevent the user from copying something into the copy/paste buffer. If so, then the code for when a Ctrl+C is pressed is:

KeyCode = 0

Of course as Greg says, if this is a simple copy of the text the user has selected, why reinvent the wheel? And keep in mind that if you trap the key because you're trying to automatically copy all of the text, the user will never be able to copy just the part of the text that they select. Of course a way around this would be to check the SelLength before you reset the SelStart and SelLength. If SelLength is GT zero, don't reset anything.

Just curious, what are you really trying to do when you trap Ctrl+C?

Randall J Weers
Membership Vice President
Pacific NorthWest Access Developers Group
http://www.pnwadg.org

I figured out how to trap it. I need to enable the user to be able to copy a variable (the phone number) out of the list box. I'm not sure how to do this. Below is the code that's used to fill the list box (PhoneNumberListBx):
ctl!PhoneNumberListBx.RowSource = "SELECT phone_id, phone_desc, FormatPhone(phone_number) FROM dbo_vwOrgPhone " _
& strWhere & " ORDER BY phone_desc;"

When I click on the list box and Control - C, it only copies the first column. Which is not the phone number. The phone number is in the 3rd column. Maybe I'm going about this all wrong. I'm fairly new to this so please bear with me.

Can anyone help me out on this? I appreciate your help.

Let me know if there are any questions.

Thanks.

rjweers, what I need to do is get the Phone Number on the List box into the copy/paste buffer for the user to use. Can you tell me how to do this?

Thanks

Ah ha! A bit more tricky, eh? Obviously, when the user presses Ctrl+C they get the value of the bound column, not the text of the item that is selected.

So there's one option. Make the phone number field the bound column. I'm not sure why the phone number can't be the bound column in the list box. But apparently, since you're doing something with a doubleclick, the list box uses the bound column to do some other work.

So, as you said, what you really want to do is simply put the phone number into the clipboard. So here's an MSKB article for doing just that: http://support.microsoft.com/default...kb;en-us;96900 Be aware that the code there has some minor errors when it comes to the underscore (_) continuations. VBA requires a space before an underscore that is used as a continuation character.

It looks like fairly easy code to use. But if you can get around having to do that by binding the phone number, that's probably your best bet. You can easily do this and still keep the currently bound field in your list. You'll just have to change your code that uses that bound column to use Me.lstResults.Column(0) (assuming your current bound column is 1).

BTW, if you choose not to change the bound column and do the copy to the clipboard, you can get at the value of the phone number by using Me.lstResults.Column(i) where "i" is the index of the column of the phone number and the first column in a list box is zero (like the default for any array). This method saves writing code that uses the bound column to lookup information that is already available in the list.

NOTE: I found the MSKB article by going to http://search.microsoft.com and typing the search string: clipboard access. The article was the first on the list. (Yes, true to my nature, I'm still trying to teach you all how to fish rather than giving you the fish.)

Thanks for the reply rjweers. I'll talk to the person who developed the application to see if it would be a problem to change the bound column and if it is, I'll try to put the phone number into the clipboard. Thank you very much for your help. I appreciate it.

I do search for the answers myself and only post my problems when I can't figure it out on my own. There are times (as in this one) I'm not sure what to even search on. Again, thanks for your help. Hopefully I can get this to work. :)

I ended up not needing to put the phone number into the clipboard. I was able to change the bound column to the phone number column. I then captured the Control-C event and used DoCmd.RunCommand acCmdCopy to copy the phone number. Thanks rjweers for your help.

It's nice when things work out the easy way...

But now it's time to go back to Greg's post. With the way you now have the combobox set up (having phone be the bound column), you don't need to capture Ctrl+C. Just let the built-in functionality of Windows do it for you. Even easier!!!