9111_de-DE

liliconcom

Konturdiagramm mit VB-Automatisierung<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Hey, ich versuche, mithilfe von VB-Automatisierung ein Konturdiagramm aus einer Datentabelle zu erstellen. Ich muss "Bereiche füllen" angeben und die maximalen und minimalen Konturebenen festlegen. Vielen Dank

Hier ist, was ich bisher habe. Ich bekomme immer einen Laufzeitfehler 438 für die Zeile "Set con = jmpdoc1.CreateContour"

Unter JMP()

Dim jmpdoc1 Als JMP.Document

Dim myJMP As JMP.Application

   

Dim DT als JMP.DataTable

   

Set myJMP = CreateObject("jmp.application")

meinJMP.Visible = True

Set jmpdoc1 = myJMP.OpenDocument("C:\Users\jsuls\Desktop\test.csv")

Setzen Sie DT = jmpdoc1.GetDataTable

   

  

Dim con As JMP.Contour

Setzen Sie con = jmpdoc1.CreateContour

con.LaunchAddY ("Z")

con.LaunchAddX ("X")

con.LaunchAddX ("Y")

con.FillAreas (Wahr)

con.SpecifyContours(5.0,20.0,6.0,True)

con.Launch

                          

End Sub

Betreff: Konturdiagramm mit VB-Automatisierung

Tut mir leid, aus irgendeinem Grund habe ich keine Benachrichtigung über eine Antwort erhalten.Der Aufruf in Automation zum Erstellen eines Konturdiagramms ist CreateContourPlot, nicht CreateContour.Hast du CreateContourPlot?

Betreff: Konturdiagramm mit VB-Automatisierung

Das Problem besteht nicht darin, die CSV-Datei zu öffnen. Ich kann es mit dem obigen Code öffnen. Das Problem ist die Erstellung des Konturdiagramms. Mit diesem VB-Code kann ich Verteilungen, Oberflächendiagramme usw. erstellen. Das einzige Problem, das auftritt, ist, wenn ich versuche, ein Konturdiagramm zu erstellen. Ich bekomme immer die Fehlermeldung "Objekt unterstützt diese Eigenschaft oder Methode nicht".

Betreff: Konturdiagramm mit VB-Automatisierung

Für Textdateien müssen Sie die Textimportschnittstelle zur Automatisierung verwenden.Die Beispielanwendung „Textimport“ in Ihrem Ordner „Samples Automation“ enthält ein Beispiel.Für JMP 11 wäre der Speicherort etwa C:\Programme\SAS\JMP\11\Samples\Automation\Visual Basic Samples\Text Import .NET.

Wenn Sie dieses Beispiel öffnen, sehen Sie, dass eine typische Sequenz zum Öffnen einer CSV-Datei etwa so aussehen würde:

Dim TI als JMP.TextImport

TI = MyJMP.CreateTextImportObject("c:\program files\sas\jmp\11\samples\import data\Book1.csv", 10000)

TI.SetEndOfFieldOptions(JMP.jmpTIEndOfFieldConstants.tiComma)

TI.SetEndOfLineOptions(JMP.jmpTIEndOfLineConstants.tiCRLF)

TI.FirstLineIsData(True)

Doc = TI.OpenFile()