---
title: "simulera musrörelser"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/27751-simulera-musrörelser"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "room"
published: "2001-12-28T00:49:00.000Z"
updated: "2002-02-04T20:06:00.000Z"
replies: 8
views: 416
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/27751-simulera-musrörelser"
---

# simulera musrörelser

## #1 — room, 2001-12-28T00:49Z

Är det någon som har eller kan fixa ett enkelt program som simulerar musrörelser. Altså att markören åker omkring på skärmen lite då och då?

Vore väldigt tacksam för svar.

Permalänk: https://www.webforum.nu/p/27751

## #2 — fredrik, 2001-12-28T14:02Z

Du kan använda API för att flytta muspekaren:
\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Kod:\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600"\>
Private Declare Function SetCursorPos Lib "user32" ( \_
     ByVal x As Long, \_
     ByVal y As Long) As Long

Private Sub Command1_Click()
SetCursorPos 0, 0
end sub

Alltså först en deklaration av API-funktionen (lägges överst) och sen en knapp döpt till "Command1" där koden körs och flyttar musen till "0,0" dvs längst upp till vänster på skärmen.

Vill du att pekaren ska flytta sig så kan du enkelt göra en timer som flyttar några steg åt gången.

Permalänk: https://www.webforum.nu/p/400050

## #3 — room, 2001-12-28T14:28Z

Personligen så har jag inte vb utan jag tänkte om någon hade det eller kunde snabbt slänga ihop en exefil så vore det great.

Tack

Permalänk: https://www.webforum.nu/p/400051

## #4 — Jon, 2001-12-28T15:36Z

Om du gör middag till mig så ska jag tänka på saken :e

Permalänk: https://www.webforum.nu/p/400052

## #5 — fredrik, 2002-01-04T10:45Z

Vad vill du att programmet ska göra? bara flytta runt muspekaren lite då och då?

låter inte som världens mest fyndiga idé...men men...

Permalänk: https://www.webforum.nu/p/400053

## #6 — OveRRidE, 2002-01-06T17:50Z

Låter som ett program för att lura chefen när han går förbi ryggen på dig och du sover. :e

Permalänk: https://www.webforum.nu/p/400054

## #7 — PishtheDJ, 2002-02-03T21:45Z

Hej..Jag är helle rinte så där "super" på vb och undrar hur man kan få veta muspekarens position...

Tack på förhand.

Permalänk: https://www.webforum.nu/p/400055

## #8 — fredrik, 2002-02-04T07:38Z

Du kan hämta mus-positionen med följande API:

\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Kod:\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600"\>
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Type POINTAPI
    x As Long
    y As Long
End Type
Private Sub Form_Load()
    Dim mypt As POINTAPI
    GetCursorPos mypt
    MsgBox "Position: " & mypt.x & ", " & mypt.y
End Sub

Permalänk: https://www.webforum.nu/p/400056

## #9 — PishtheDJ, 2002-02-04T20:06Z

Tack!!

Permalänk: https://www.webforum.nu/p/400057

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/27751-simulera-musrörelser