VB.NETÖвÙ×÷xmlÎļþ£¨²åÈë½Úµã¡¢Ð޸ġ¢É¾³ý£©
ÒÑÖªÓÐÒ»¸öXMLÎļþ£¨bookstore.xml£©ÈçÏ£º
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
<book genre="fantasy" ISBN="2-3631-4">
<title>Oberon's Legacy</title>
<author>Corets, Eva</author>
<price>5.95</price>
</book>
</bookstore>
1¡¢Íù<bookstore>½ÚµãÖвåÈëÒ»¸ö<book>½Úµã£º
Dim xmlDoc As New XmlDocument()
xmlDoc.Load("bookstore.xml")
Dim root As XmlNode = xmlDoc.SelectSingleNode("bookstore") '²éÕÒ<bookstore>
Dim xe1 As XmlElement = xmlDoc.CreateElement("book") '´´½¨Ò»¸ö<book>½Úµã
xe1.SetAttribute("genre", "ÀîÔÞºì") 'ÉèÖøýڵãgenreÊôÐÔ
xe1.SetAttribute("ISBN", "2-3631-4") 'ÉèÖøýڵãISBNÊôÐÔ
Dim xesub1 As XmlElement = xmlDoc.CreateElement("title")
xesub1.InnerText = "CS´ÓÈëÃŵ½¾«Í¨" 'ÉèÖÃÎı¾½Úµã
xe1.AppendChild(xesub1) 'Ìí¼Óµ½<book>½ÚµãÖÐ
Dim xesub2 As XmlElement = xmlDoc.CreateElement("author")
xesub2.InnerText = "ºò½Ý"
xe1.AppendChild(xesub2)
Dim xesub3 As XmlElement = xmlDoc.CreateElement("price")
xesub3.InnerText = "58.3"
xe1.AppendChild(xesub3)
root.AppendChild(xe1) 'Ìí¼Óµ½<bookstore>½ÚµãÖÐ
xmlDoc.Save("bookstore.xml")
//===============================================
½á¹ûΪ£º
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
<book genre="fantasy" ISBN="2-3631-4">
<title>Oberon's Legacy</title>
<author>Corets, Eva</author>
<price>5.95</price>
</book>
<book genre="ÀîÔÞºì" ISBN="2-3631-4">
<title>CS´ÓÈëÃŵ½¾«Í¨</title>
<author>ºò½Ý</author>
<price>58.3</price>
</book>
</bookstore>
2¡¢Ð޸Ľڵ㣺½«genreÊôÐÔֵΪ“ÀîÔ޺쓵ĽڵãµÄgenreÖµ¸ÄΪ“updateÀîÔ޺씣¬½«¸Ã½ÚµãµÄ×Ó½Úµã<author>µÄÎı¾ÐÞ¸ÄΪ“ÑÇʤ”¡£
Dim nodeList As XmlNodeList = xmlDoc.SelectSingleNode("bookstore").ChildNodes '»ñÈ¡bookstore½ÚµãµÄËùÓÐ×Ó½Úµã
Dim xn As XmlNode
For Each
Ïà¹ØÎĵµ£º
Format[$] ( expr [ , fmt ] )
format ·µ»Ø±äÌåÐÍ
format$ Ç¿ÖÆ·µ»ØΪÎı¾
--------------------------------
Êý×ÖÀàÐ͵ĸñʽ»¯
--------------------------------
¹Ì¶¨¸ñʽ²ÎÊý£º
General Number ÆÕͨÊý×Ö£¬Èç¿ÉÒÔÓÃÀ´È¥µôǧλ·Ö¸ôºÅ
format$("100 ......
rndº¯Êý·µ»Ø»òÕß˵²úÉúÒ»¸öСÓÚ1µ«´óÓÚ»òµÈÓÚ0µÄsingleÀàÐ͵ÄËæ»úÊý¡£
²úÉúËæ»úÊý֮ǰÐèÒªÒ»¸öÖÖ×Ó¡£
·²»Í¬µÄÖÖ×Ó£¬¿ÉʹËæ»úÊýÉú³ÉÆ÷Éú³É²»Í¬µÄËæ»úÊý£»
·ÔÚÒ»¸öÖÖ×ÓÏ£¬Éú³ÉµÄËæ»úÊýÏàͬ¡£
Ëæ»úÊýÉú³ÉÆ÷µÄÓï¾äΪrandomize¡£¸ñʽΪ£ºrandomize[x]¡£
·µ±x>0ʱ£¬Ê¹ÓÃÇ°Ò»´Îµ÷ÓÃrndº¯Êý²úÉúµÄË ......
1¡¢´´½¨¿Ø¼þ£ºlbl1¡¢txt1¡¢lbl2¡¢cmd1
2¡¢lbl1.caption=ÊäÈëÈÕÆÚ£¨ÈÎÒ»ÖÖÕýÈ·¸ñʽ£©£º
ÉèÖÃlbl1¡¢txt1¡¢lbl2¡¢cmd1µÄ×ÖÌå´óС¼°ÑÕÉ«£»
3¡¢Ë«»÷°´Å¥“È·ÈÏ”£¬Ìí¼Ó´úÂ룬Ч¹ûΪ£º
Option Explicit
Private Sub cmd1_Click()
&nb ......
Õâ¸öЧ¹ûÓ¦¸Ã²»ËãʲôϡÆ棬ÍøÉÏÒ²ÓÐÏֳɵĴúÂ룬ÎÒÕâ¸öҲûʲôÌرðµÄµØ·½£¬Ö»ÊÇÒòΪÎÒ×Ô¼ºÐ´µÄ£¬Ò²ËãÊÇΪѧϰDOMºóÒ»¸öÁ·Ï°£»ÔÚIEϲâÊÔͨ¹ý£»
ʵÏÖЧ¹ûÊÇÕâÑùµÄ£º
¶ÁÈ¡XMLÎĵµ£»
²ÉÓõݹéÉú³ÉÎÞÏÞ¼¶µÄÊ÷Ðβ˵¥£»
Äܹ»ÏìÓ¦Êó±êʼþ£¬Õ¹¿ªÓë²ðµþ×Ó¼¶²Ëµ¥£»
Ê×ÏÈÊÇÉú³ÉÒ»¸öXMLÎĵµ£¬ÎÒÓõÄÊÇXML SpyµÄ±à¼Æ÷£»
< ......
¶ÔXmlµÄ½Úµã½øÐмòµ¥²éѯµÄʱºò£¬³£ÓõĿÉÒÔʹÓÃÈçÏ·½·¨£º
(1) XmlNode node = doc.selectSingleNode("//AllNode/Node[@ID = ’aaa’]");
ÔÚÕû¸öXmlÖвéÕÒAllNode½ÚµãϵĽڵãÃûΪNodeµÄ½Úµã£¬¸Ã×Ó½ÚµãµÄIDÊôÐÔֵΪaaa
(2)XmlNode node = doc.selectSingleNode("//AllNode /*[@ID = ’aaa& ......