Verwalten Sie VBA-Codes von Visio Macro-Enabled diagram.

Fügen Sie ein VBA-Modul hinzu

Der folgende Beispielcode fügt ein neues VBA-Modul und Makrocode hinzu und speichert die Ausgabe im Format VSDM. Einmal öffnen Sie die Ausgabedatei VSDM in Microsoft Visio und klicken auf dieEntwickler > Visual Basic Menübefehle sehen Sie ein Modul namens “TestModule” und darin sehen Sie den folgenden Makrocode.

 Sub ShowMessage()

    MsgBox "Welcome to Aspose!"

End Sub

Hier ist der Beispielcode zum Generieren der Ausgabedatei VSDM mit VBA-Modul und Makrocode.

// For complete examples and data files, please go to https://github.com/aspose-diagram/Aspose.Diagram-for-Java
// The path to the documents directory.
String dataDir = Utils.getDataDir(Test.class);
// Load a diagram
Diagram diagram = new Diagram(dataDir + "1.vsdm");
//Add module
int index = diagram.getVbaProject().getModules().add(VbaModuleType.PROCEDURAL, "TestModule");
//Get module
com.aspose.diagram.VbaModule module = diagram.getVbaProject().getModules().get(index);
//Set module
module.setCodes("Attribute VB_Name = \"module2\"\r\n Sub Button1_Click()\r\n\r\n MsgBox \"Welcome to Aspose!\"\r\n\r\nEnd Sub\r\n");
diagram.save(dataDir + "1out.vsdm", SaveFileFormat.VSDM);

Ändern Sie VBA oder Makro

Der folgende Beispielcode lädt die Quelldatei Visio, die den folgenden VBA- oder Makrocode enthält

 Sub Button1_Click()

    MsgBox "This is test message."

End Sub

Nach der Ausführung des Beispielcodes Aspose.Diagram wird der VBA- oder Makrocode wie folgt geändert

 Sub Button1_Click()

    MsgBox "This is Aspose.Diagram message."

End Sub

Sie können die herunterladenQuelldatei Visio und dieAusgabedatei Visio aus den angegebenen Links.

// For complete examples and data files, please go to https://github.com/aspose-diagram/Aspose.Diagram-for-Java
// The path to the documents directory.
String dataDir = Utils.getDataDir(Test.class);
// Load a diagram
Diagram diagram = new Diagram(dataDir + "1.vsdm");
//Get module
com.aspose.diagram.VbaModule module = diagram.getVbaProject().getModules().get(2);
//Set module
module.setCodes("Attribute VB_Name = \"module2\"\r\n Sub Button1_Click()\r\n\r\n MsgBox \"This is Aspose.Diagram message.\"\r\n\r\nEnd Sub\r\n");
diagram.save(dataDir + "1out.vsdm", SaveFileFormat.VSDM);

Themen vorantreiben