VB´°ÌåµÄÊôÐÔÉèÖôúÂë
Õâ¶Î³ÌÐòÖÐ
Begin VB.Forms_frmmain BorderStyle = 1 'fixed single
Caption = "ËÙËã24"
clientHeight = 6375
clientLeft = 1545
clientTop = 795
clientWidth = 7515
BeginProperty Font
Name = "ËÎÌå"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'false
Italic = 0 'false
Strikethrough = 0
endproperty
LinkTopic = "form1"
lockcontrols = -1
MaxButton = 0
scalleheight = 425
ScaleMode = 3
ScaleWidth = 501
StartUpPosition = 2
Ϊʲôµ÷ÊÔÊÇ˵ÎÞÍⲿ³ÌÐò£¬µ«Êǽ̳ÌÀïûÓÐ˵Ã÷£¬¿É·ñ½âÊÍÒ»ÏÂ
Begin VB.Forms_frmmain ÕâÒ»¾ä
Õâ¶Î´úÂëÔÚÄÄÀïÊäÈë
ÐÂÊÖ ty
Ïà¹ØÎÊ´ð£º
´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ
printer.print "dsff"
.....
....
Printer.EndDoc
´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ
sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......
VB code:
Private objXml As New DOMDocument60
Private xmlRoot As IXMLDOMElement
Public Function xmlNode()
Set objXml = New DOMDocument
objXml.async = False
objXml.Load ("E:\Li ......
ÓÉÓÚÿÔ´ӱðµÄ¹«Ë¾ËÍÀ´Ò»¸ötxtÎļþ£¬¸ñʽÈçÏ£º
0023939608011»Æ¸ùÑø & ......
pow(x+sqrt(x*x+1),1.0/3) (x+sqrt(x*x+1))^1.0/3
ÉÏÃæÕâÁ½¸öÖÐÄĸöÊǶԵİ¡»¹ÊǶ¼¿ÉÒÔ »¹ÓÐÆäÖеÄ1.0ÊDZØÐëÓÃ1.0? ¿É²»¿ÉÒÔÓÃ1°¡
sqrÊǺ¯Êý£¬sqrtºÍpowÏë±ØÊÇ×Ô¶¨Ò庯Êý£¬²»Ö ......