Open Paint when clicking on bound object frame?

[Richard M]

How can I open Paint using vba or macros? I want to click on the bound object frame and have Paint open up so the user can make a drawing. I also want to double click a drawing in the bound object frame and have Paint open up in the edit mode.

Thanks for any help.

Richard

Iam still looking for the above, but in a previous post it was mentioned a work around. I did not understand it until now. So I made a table "tblBMPImage" with a blank BMP made in Paint. Then a query that would show only one record.

In my form's open property, I put
me.myfiled=dfirst("[bmpimage]","qryBMPimage") and this put the bmp in the field. Now all I have to do is click on it and Paint opens where I can create a new or edit a drawing.

Richard

 

[clo]

I am trying to do the same thing as Richard. Would like to have user click OLEBound frame and Paint open automatically so that user can make a drawing (bmp). I am trying to use the work around, but cannot get it to work. I keep getting error that OLEBound is Null---maybe a problem with my control source? Here is the code I entered (also tried this in the object's On_Click event):

Private Sub Form_Open(Cancel As Integer)
Me.OLEBound250 = DFirst("[bmpimage]", "qry bmpimage")
End Sub

New to Access and VBA, and I do not really understand code. Any assistance would be appreciated. Thank you.

 

[clo]

I have struggled with this for hours. I finally post looking for help, and I get it to work (of course). Here is the code I put in my object's On Double Click event, FYI:

Private Sub OLEBound250_DblClick(Cancel As Integer)
Me.OLEBound250 = Null
Me.OLEBound250 = DFirst("[bmp image]", "tbl_BMPimage")
End Sub


Seems to be working and saving as I want! Thank you.