Übergabe der benötigten Daten<\/h2>\n
Welche Werte wollen wir der DLL zum Verarbeiten im EPC-QR-Code übergeben?<\/p>\n
- \n
- BIC<\/li>\n
- IBAN<\/li>\n
- Verwendungszweck<\/li>\n
- Empfängername<\/li>\n
- Betrag<\/li>\n<\/ul>\n
Art der Übergabe der benötigten Informationen<\/h2>\n
Wie wollen wir die Informationen an die DLL übergeben? Für diese Informationen können wir entweder Eigenschaften für die in der DLL enthaltenen Klasse, denen wir die Werte zuweisen können, oder wir statten die Funktion, welche den QR-Code erstellt und dann in der einen oder anderen Form zurückliefert, mit den entsprechenden Parametern aus. Wir implementieren einfach beide Varianten, damit der Benutzer die DLL nach seinen eigenen Wünschen einsetzen kann.<\/p>\n
Projekt erstellen<\/h2>\n
Als Erstes erstellen wir ein neues Projekt mit der Vorlage Klassenbibliothek (.NET Framework)<\/b> für die Sprache Visual Basic <\/b>(siehe Bild 1).<\/p>\n
![\"Auswahl](\"..\/fileadmin\/_temp_\/2022_01\/pic_301_001.png\")
<\/p>\nBild 1: Auswahl des Projekttyps<\/span><\/b><\/p>\n
Anschließend geben wir als Namen amvFoto-ueber-weisung <\/b>ein und wählen den gewünschten Pfad aus (siehe Bild 2). Hier wählen wir auch das gewünschte Zielframework aus, in diesem Fall .NET 4.7.2<\/b>.<\/p>\n
![\"Konfigurieren](\"..\/fileadmin\/_temp_\/2022_01\/pic_301_002.png\")
<\/p>\nBild 2: Konfigurieren des neuen Projekts<\/span><\/b><\/p>\n
Klassennamen anpassen<\/h2>\n
Danach stellen wir den Klassennamen von Class1.vb <\/b>auf EPCQRCode.vb <\/b>um. Die anschließende Nachfrage, ob auch alle Verweise auf die Klasse geändert werden sollen, akzeptieren wir mit einem Klick auf Ja<\/b>.<\/p>\n
Öffentliche Eigenschaften hinzufügen<\/h2>\n
Anschließend erweitern wir die noch leere Klasse um mehrere Elemente, als Erstes um den Import des Namespaces System.Runtime.InteropServices<\/b>:<\/p>\n
Imports System.Runtime.InteropServices<\/pre>\n
Danach könnten wir bereits die Klasse EPCQRCode <\/b>hinzufügen und für diese die fünf öffentlichen Eigenschaften definieren, die für die Übergabe der für das Erstellen des QR-Codes notwendigen Daten verwendet werden. Wenn wir diese Klasse später im VBA-Editor einer Access-Anwendung referenzieren, zeigt diese Klasse jedoch nicht nur die von uns hinzugefügten Eigenschaften an, sondern auch die Standardeigenschaften einer Klasse wie GetHashCode<\/b>, GetType <\/b>und ToString<\/b>. Diese verwirren in diesem Kontext jedoch mehr als dass sie helfen, also sorgen wir dafür, dass unsere Klasse nur die von uns definierten Member anzeigt.<\/p>\n
Dies erreichen wir, indem wir eine öffentliche Schnittstelle namens IEPCQRCode<\/b> definieren, welche nur die gewünschten Eigenschaften vorgibt. Für diese legen wir überdies ein Attribut fest, und zwar InterfaceType <\/b>mit dem Wert ComInterfaceType.InterfaceIsDual<\/b> (dafür benötigen wir den oben genannten Namespace<\/b>-Verweis):<\/p>\n
<InterfaceType(ComInterfaceType.InterfaceIsDual)>\r\nPublic <\/span>Interface IEPCQRCode\r\n Property Verwendungszweck As String<\/span>\r\n Property BIC As String<\/span>\r\n Property IBAN As String<\/span>\r\n Property Betrag As <\/span><Runtime.InteropServices.MarshalAs( _ Runtime.InteropServices.UnmanagedType.Currency)> Decimal\r\n Property Empfaenger As String<\/span>\r\nEnd Interface<\/pre>\nFür den Betrag ist ein kleiner Trick notwendig: Der Datentyp Decimal <\/b>von .NET kann von VBA nicht verarbeitet werden, daher wandeln wir diesen in Currency <\/b>um.<\/p>\n
Nun implementieren wir diese Schnittstelle in Form der Klasse EPCQRCode<\/b>, für die wir ebenfalls ein Attribut festlegen, nämlich ClassInterface <\/b>mit dem Wert ClassInterfaceType.None<\/b>. Die Klasse enthält Implementierungen aller in der Schnittstelle festgelegten Eigenschaften, was durch das jeweilige Anhängsel wie Implements IEPCQRCode.Verwendungszweck <\/b>gekennzeichnet wird:<\/p>\n
<ClassInterface(ClassInterfaceType.None)>\r\nPublic Class<\/span> EPCQRCode\r\n Implements IEPCQRCode\r\n Public <\/span>Property Verwendungszweck As String<\/span> Implements IEPCQRCode.Verwendungszweck\r\n Public <\/span>Property BIC As String<\/span> Implements IEPCQRCode.BIC\r\n Public <\/span>Property IBAN As String<\/span> Implements IEPCQRCode.IBAN\r\n Public <\/span>Property Betrag As Decimal<\/span> Implements IEPCQRCode.Betrag\r\n Public <\/span>Property Empfaenger As String<\/span> Implements IEPCQRCode.Empfaenger\r\nEnd Class<\/span><\/pre>\nUm diese zuerst einmal zu testen, bevor wir die Eigenschaften mit Leben füllen und die Methoden und Funktionen hinzufügen, nehmen wir nun einige weitere Einstellungen am Projekt vor:<\/p>\n
- \n
- Registrieren für COM-Interop<\/li>\n
- Assembly COM-sichtbar machen<\/li>\n<\/ul>\n
Registrieren für COM-Interop<\/h2>\n
Die Überschrift gibt bereits den Namen der Eigenschaft wieder, die wir aktivieren müssen. Dazu klicken Sie mit der rechten Maustaste auf den Projekteintrag im Projektmappen-Explorer und wählen dort den Eintrag Eigenschaften <\/b>aus.<\/p>\n
Im nun erscheinenden Eigenschaften-Bereich wechseln wir links zum Registerreiter Kompilieren<\/b>. Dort finden wir unten die Eigenschaft Für COM-Interop registrieren<\/b>, die wir nun aktivieren (siehe Bild 3).<\/p>\n
![\"Aktivieren](\"..\/fileadmin\/_temp_\/2022_01\/pic_301_003.png\")
<\/p>\nBild 3: Aktivieren der Eigenschaft Für COM-Interop registrieren<\/span><\/b><\/p>\n
Assembly COM-sichtbar machen<\/h2>\n
Für die zweite wichtige Einstellung wechseln wir links zum Registerreiter Anwendung<\/b>. Hier finden wir die Schaltfläche Assemblyinformationen…<\/b>, die wir anklicken (siehe Bild 4).<\/p>\n
![\"Öffnen](\"..\/fileadmin\/_temp_\/2022_01\/pic_301_004.png\")
<\/p>\nBild 4: Öffnen der Assemblyinformationen<\/span><\/b><\/p>\n
Im folgenden Dialog Assemblyinformationen <\/b>finden wir einige interessante Einstellungen. Am wichtigsten für die gewünschte Funktion ist hier jedoch die Aktivierung der Option Assembly COM-sichtbar machen <\/b>beziehungsweise die Prüfung, ob diese bereits aktiviert ist (siehe Bild 5).<\/p>\n
![\"Aktivieren](\"..\/fileadmin\/_temp_\/2022_01\/pic_301_005.png\")
<\/p>\nMöchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Visual Basic Entwickler<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 200 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t