vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Suche Visual-Basic Code
Re: Tabelle in XML umwandeln 
Autor: gaschi14
Datum: 22.04.08 11:29

 
    If strFootnote = "2" And blRanks Then
        Set xmlFootnote = xml.createElement("Footnote")
        myNode.appendChild xmlFootnote
        subxmlAttribute "Id", myFootPos, xmlFootnote
        subxmlText "The other rank is in ", xmlFootnote
 
        Set xml_PhysicalSymbolElement = xml.createElement("PhysicalSymbol")
        subPhysicalValueElement "I", xml_PhysicalSymbolElement
        subSubscriptElement "DD2P ", xml_PhysicalSymbolElement
        xmlFootnote.appendChild xml_PhysicalSymbolElement
 
        subxmlText "Precharge Power-Down Current mode", xmlFootnote
    End If
 
    If strFootnote = "3" And blRanks Then
        Set xmlFootnote = xml.createElement("Footnote")
        myNode.appendChild xmlFootnote
        subxmlAttribute "Id", myFootPos, xmlFootnote
        subxmlText "Both ranks are in the same ", xmlFootnote
 
        Set xml_PhysicalSymbolElement = xml.createElement("PhysicalSymbol")
        subPhysicalValueElement "I", xml_PhysicalSymbolElement
        subSubscriptElement "DD", xml_PhysicalSymbolElement
        xmlFootnote.appendChild xml_PhysicalSymbolElement
 
        subxmlText "current mode", xmlFootnote
    End If
 
   If strType = "Component" Then
 
        If strFootnote = "1" Then
            Set xmlFootnote = xml.createElement("Footnote")
            myNode.appendChild xmlFootnote
            subxmlAttribute "Id", myFootPos, xmlFootnote
 
            Set xml_PhysicalSymbolElement = xml.createElement("PhysicalSymbol")
            subPhysicalValueElement "I", xml_PhysicalSymbolElement
            subSubscriptElement "DD6 ", xml_PhysicalSymbolElement
            xmlFootnote.appendChild xml_PhysicalSymbolElement
 
            subxmlText ": 0", xmlFootnote
            subSymbolCharElement " £ ", xmlFootnote
            subxmlText "T", xmlFootnote
            subSubscriptElement "CASE", xmlFootnote
            subSymbolCharElement " £ ", xmlFootnote
            subxmlText "85", xmlFootnote
            subxmlText "°C", xmlFootnote
 
        End If
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Tabelle in XML umwandeln3.158gaschi1422.04.08 11:21
Re: Tabelle in XML umwandeln1.555gaschi1422.04.08 11:21
Re: Tabelle in XML umwandeln1.385gaschi1422.04.08 11:23
Re: Tabelle in XML umwandeln1.350gaschi1422.04.08 11:24
Re: Tabelle in XML umwandeln1.345gaschi1422.04.08 11:25
Re: Tabelle in XML umwandeln1.296gaschi1422.04.08 11:26
Re: Tabelle in XML umwandeln1.307gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.276gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.355gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.362gaschi1422.04.08 11:28
Re: Tabelle in XML umwandeln1.347gaschi1422.04.08 11:28
Re: Tabelle in XML umwandeln1.358gaschi1422.04.08 11:29
Re: Tabelle in XML umwandeln1.326gaschi1422.04.08 11:29
Re: Tabelle in XML umwandeln1.323gaschi1422.04.08 11:30
Re: Tabelle in XML umwandeln1.411gaschi1422.04.08 11:30

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel