Welcome to MapForums!

Register, sign in, or use Facebook Connect above to join in and participate in the forum.

When you are signed in, this message, the ads in this row, and the red-underlined link ads all go away.

Subscribe to receive our newsletter.
Subscribe Unsubscribe
Results 1 to 2 of 2

MapPoint-Ereignisse mit VBA

This is a discussion on MapPoint-Ereignisse mit VBA within the MapPoint Desktop Discussion forums, part of the Map Forums category; Hallo zusammen! Wie kann ich MapPoint-Ereignisse abfangen in VBA, z.B. Schließen des MapPoint-Fenster? Ich bedanke mich für die Hilfe im ...

  1. #1
    Anonymous is offline Senior Member Black Belt
    Join Date
    Jul 2002
    Posts
    5,137

    MapPoint-Ereignisse mit VBA

    Hallo zusammen!

    Wie kann ich MapPoint-Ereignisse abfangen in VBA, z.B. Schließen des MapPoint-Fenster?


    Ich bedanke mich für die Hilfe im Voraus.

    Swetlana

  2. #2
    Syd
    Syd is offline Member Yellow Belt
    Join Date
    Aug 2003
    Posts
    42
    Mit VBA?
    In VB bräuchtest du auf alle Fälle ein mappoint object mit withevents

    Public WithEvents m_mappointctl As MappointControl

    Die Ereignisse sind ja in der Hilfe beschrieben.



    Beispiel
    Dim WithEvents objApp As MapPoint.Application

    Private Sub Form_Load()
    'Anwendung einrichten
    Set objApp = CreateObject("mappoint.application")
    objApp.Visible = True
    objApp.UserControl = True
    End Sub

    Private Sub Command1_Click()
    'Anwendung beenden, wenn auf Schaltfläche geklickt wird
    objApp.Quit
    End Sub

    Private Sub objApp_Quit()
    MsgBox "Quit-Ereignis ausgelöst"
    End Sub
    Grüsse,
    Syd

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96