ÇóÖú£¡VB±à³ÌpictureboxÖÐÑÕÉ«ÎÊÌ⣡
±¾ÈËÏëÔÚpicturebox¿Ø¼þÖлһÌõÇúÏߣ¬µ±YÖµ´óÓÚ0ʱÇúÏßΪÀ¶É«£¬µ±YֵСÓÚ0ʱÇúÏßΪºìÉ«£¬ÇóÖú¸÷λ¸ßÊÖ£¡
ÄǾͻÁ½ÌõÏß,»òÓÃPSETÒ»¸öµãÒ»¸öµãµØ»
½áÌûÂÊ£º0.00%
VB code:
Picture1.Line (X1, Y1)-(X2, Y2), vbBlue
Èç¹ûÒª»µÄÏߺÍYÖáÓн»µã£¬¼ÆËã³ö½»µãµÄ×ø±ê£¬·ÖÁ½¶Î»¡£
ÓÃPSETÒ»¸öµãÒ»¸öµãµØ»,ÎÒÊÔÁ˲»ÐÐ
VB code:
Option Explicit
Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture1.Scale (-100, 100)-(100, -100)
'ºÚµ×'
Picture1.BackColor = vbBlack
'°×Ïß'
Picture1.Circle (0, 0), 70, vbWhite, , , Picture1.Height / Picture1.Width
'ÓÃÓ뷽ʽ½øÐÐÂËÉ«'
Picture1.DrawMode = vbMaskPen
Picture1.Line (-100, 100)-(100, 0), vbBlue, BF
Picture1.Line (-100, 0)-(100, -100), vbRed, BF
End Sub
Option Explicit
Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture1.Scale (-100, 100)-(100, -100)
'ºÚµ×'
Picture1.BackColor = vbBlack
'°×Ïß'
Picture1.Circle (0, 0), 70, vbWhite, , , Picture1.Height / Picture1.Width
'ÓÃÓ뷽ʽ½øÐÐÂËÉ«'
Picture1.DrawMode = vbMaskPe
Ïà¹ØÎÊ´ð£º
vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?
°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌø×ªµ½´íÎóÐÐ
²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.
ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......
vbÖÐÔõôͨ¹ýxmlÀ´½âÎöÊý¾Ý¿âÖеÄ×Ö¶ÎÖµ¡£
û°ì·¨ÓÃXML½âÎöÊý¾Ý¿âµÄ×Ö¶ÎÖµ£¬³ý·ÇÊý¾Ý¿âÖб£´æµÄÊÇXML¸ñʽµÄ×Ö·û´®Îĵµ¡£
XMLÓÃÀ´Õ¹Ê¾²ã´ÎµÄÊý¾Ý¡£
Êý¾Ý¿âÒ»°ãÊǶþάÊý¾Ý¡£
Êý¾Ý¿âÖб£´æµÄÊÇXML×Ö·û´®¸ñʽ£ ......
vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......
±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......