Søg
Avatar billede per2edb Ekspert
29. oktober 2023 - 15:20 Der er 8 kommentarer og
1 løsning

Frm As Form indsat i SUB

Denne sub driller mig.
Den ligger i en form benævnt:  FrmPris

Hvad skal jeg indsætte i stedet for Frm As Form ?

Sub xg_SizeFormWindow(Frm As Form, X As Integer, Y As Integer, cx As Integer, cy As Integer)
Avatar billede Gustav Ekspert
29. oktober 2023 - 17:03 #1
Det kunne være:
xg_SizeFormWindow(Forms("FrmPris"), 100, 200, 300, 400)
Tallene skal naturligvis erstattes med dine værdier.
Avatar billede per2edb Ekspert
29. oktober 2023 - 17:58 #2
Undskyld !!!!!

Jeg fik ikke fortalt at
xg_SizeFormWindow(Forms("FrmPris"), 100, 200, 300, 400)
ligger i et modul

Som vist ovenfor fungerer det ikke
Avatar billede per2edb Ekspert
29. oktober 2023 - 18:48 #3
Det kan være du kender en anden måde at placere en form styret fra et modul

DoCmd.MoveSize  kræver man er inde i formen så den duer ikke

Jeg skal altså kunne det samme som  DoCmd.MoveSize  men fra modulet
Avatar billede Gustav Ekspert
29. oktober 2023 - 19:24 #4
Et Form objekt har metoden Move:
MinForm.Move Left, Top, Bredde, Højde
Den bruger jeg til at flytte min formular med musen her:
https://github.com/GustavBrock/VBA.ModernBox
Avatar billede per2edb Ekspert
29. oktober 2023 - 21:04 #5
Hvordan sætter du MinForm?

Forms(0).Move  virker ikke
Avatar billede Gustav Ekspert
30. oktober 2023 - 07:50 #6
Den virker fint her, fx:
Forms(0).Move 200, 300, 10000, 4000
Så der må være noget andet "på gång" hos dig.
Avatar billede per2edb Ekspert
30. oktober 2023 - 08:25 #7
Nu har jeg konstateret det er kun på opstartsformen
Hvor vil di placere Forms(0).Move 200, 300, 10000, 4000

Load og Open har jeg prøvet - men negativ
Avatar billede Gustav Ekspert
30. oktober 2023 - 08:41 #8
Dér bruger jeg DoCmd. Fx:
Private Sub Form_Open(Cancel As Integer)

    ' Flytter formularen til øverste, venstre hjørne.
    DoCmd.MoveSize 0, 0
Avatar billede per2edb Ekspert
01. november 2023 - 17:31 #9
Jeg fik det løst
Det var højde og bredde der ikke blev sat med DoCmd.MoveSize 0, 0
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access 9 16/04/202620:11 21/04/202615:43
AI integreret i Access Af per2edb i Access 3 06/04/202610:42 06/04/202612:58
Autonummerering Af hlnviv i Access 2 06/03/202606:24 06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access 6 03/03/202613:18 04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
IT-JOB
Seneste spørgsmål Seneste aktivitet
I går 16:10 Tilbage til Outlook Klassisk design Af susalapi i E-mail programmer
I går 13:59 CRASH og så gik windows ud af vinduet og ret til helvede .... Af snestrup2000 i Windows
26/0621:22 Problem med "Explorer Patcher" (File Explorer i Win 11) Af ErikHg i Andet software
26/0611:14 Windows 10 forlænger 1 år til 12. Okt. 2027 Af Uvanga i Windows
25/0622:20 Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP
White papers
Flere white papers »