vhung
Active member
- Local time
- Today, 02:57
- Joined
- Jul 8, 2020
- Messages
- 260
This is a nice application of images for rotate command,
isladogs,
I've been looking of set of codes for "Logo_rotate"
There is an existing code I run
Dim rotation As Integer
rotation = 90 ' or 180, 270, etc.
Select Case rotation
Case 0
Me!Logo.PICTURE = "C:\Users\Admin\OneDrive\Pictures\lgu_logo\Logo.png"
Case 90
Me!Logo.PICTURE = "C:\Users\Admin\OneDrive\Pictures\lgu_logo\c.png"
Case 180
Me!Logo.PICTURE = "C:\Users\Admin\OneDrive\Pictures\lgu_logo\e.png"
Case 270
Me!Logo.PICTURE = "C:\Users\Admin\OneDrive\Pictures\lgu_logo\g.png"
End Select
Noticed that there are four sources of images, needed to use with corresponding "Rotate Degrees"
Therefore, it is very difficult to use one image and make command to action as to the desired degrees of rotate
I'm very interested to this rotate image codes, using a logo on "Form"
About your "later versions, the interface looks similar to this"
> you use table to record image path
This seems interesting to me so "Table: Logo" is created, where the field logo has images of rotate "0,90,180,270"
the test is using table with records of rotated images, using Converted Macro
DoCmd.RunCommand acCmdRecordsGoToNext
DoCmd.RunCommand acCmdRecordsGoToPrevious
DoCmd.RunCommand acCmdRecordsGoToLast
DoCmd.RunCommand acCmdRecordsGoToFirst
Please see the attachment sample on Accdb.