Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBµÄÑÕÉ«ÊÇÔõô¶ÔÓ¦µÄ£¿ - VB / »ù´¡Àà

IDEÀïÃæÉèÖð׵ı³¾°É«Îª &H00FFFFFF&

ÎÒÏÖÔÚÓиöÑÕÉ«£¬WEBÑÕÉ«ÊÇ#B8D0EE RGBÊÇ 184 208 238

ÎÒ²»ÏëÓôúÂëRGBº¯Êý¸Ä±ä£¬ÎÒÏëÖ±½ÓÉèÖúÃ

µ½ÕâÀïÏÂÁ˸ö¹¤¾ß

http://download.csdn.net/down/1936671/santalin

ÄܰÑÍøÒ³µÄÑÕɫת»»³ÉVBµÄÑÕÉ«£¬×ª³öÀ´ÊÇ &HEED0B8£¬²»ÄÜÓã¬ËµÊÇÎÞЧµÄÊôÐÔÖµ

¸÷λ´ó´ó£¬ÈçºÎ²ÅÄÜ×Ô¶¨ÒåÑÕÉ«´úÂ룿


ÕâÑù¿ÉÒÔ Text1.BackColor = &HEED0B8 ,ûÓÐ˵ ÎÞЧµÄÊôÐÔÖµ

VB code:
Public Function WEB2VB(c As String) As Long
If (Len(c) <> 7) Then WEB2VB = 0: Exit Function
WEB2VB = CLng("&H" & Left$(StrReverse(c), 6))
End Function

'²âÊÔ´úÂë
Private Sub Command2_Click()
Text1.BackColor = WEB2VB("#B8D0EE")
End Sub





Èçһ¥Ëù˵,Ó¦¸ÃûÓÐÎÊÌâµÄ°¡,Â¥Ö÷ÈçºÎ»¹ÊDz»³É¹¦,¿É°Ñ´úÂëÌù³öÀ´¿´ÊDZðµÄÄÄÀï³öÁËÎÊÌâ

˵ÁË£¬²»ÊÇÓôúÂë½øÐÐÉèÖá£ÊÇÖ±½ÓÔÚÊôÐÔÀ¸½øÐÐÉèÖÃ

ÒýÓÃ
&amp;H0000FF00&amp; ¶ÔÓ¦ÓÚRGB£ºR£½0 G£½FF B£½0
R=&amp;H0000FF00&amp; mod &amp;H100
G=(&amp;H0000FF00&amp;-R) Mod &amp;H100
B=(&amp;H0000FF00&amp;-G*&amp;H100-R) Mod &amp;H100

°´ÄãÕâ˵·¨£¬&H00FFFFFF&¶ÔÓ¦µÄRÊÇ00 GÊÇFF BÊÇFF£¿
Õâ¸ö¶ÔÓ¦ÊÇ»ÆÉ«£¬¿ÉVBÀïÃ÷Ã÷Êǰ×É«¡£²»ÐÅÄã×Ô¼º´´½¨¸ö¶Ô»°¿òÊÔÏÂ

Ò


Ïà¹ØÎÊ´ð£º

vb ÖÐ - VB / »ù´¡Àà

ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

ÖÐɽµÄVB³ÌÐòÔ±½øÀ´¿´Ò»Ï - VB / ·Ç¼¼ÊõÀà

¸Õ½¨ÁËÒ»¸öȺ:ÖÐɽVB±à³Ì(105787219)
ÓÐÔÚÖÐɽ¼°ÖÐɽÖܱߵijÌÐòÔ±Çë¼ÓÈë.´ó¼ÒÒ»Æð̽ÌÖÎÊÌâ.ºÏ×÷ÏîÄ¿.
¾¡¹Ü°³²»ÊÇÖÐɽµÄ£¬Ò²½øÀ´²ä·Ö¡­¡­

·ðɽµÄÐÐÂð,¹ãÖݵÄÐÐÂð?

ÓÑÇéÖ§³Ö
»Ø¸´ÄÚÈÝÌ«¶ÌÁË£¡ 

°ï¶¥ ......

ÇóÖú£ºC´úÂëchange toVB´úÂë - VB / »ù´¡Àà

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......

vb activex ´«µÝ²ÎÊý - VB / COM/DCOM/COM+

ÎÒÓÃVBдÁËÒ»¸öactivex£¬ÏÖÔÚÏëÔÚjsÀïÃæÏòactivex´«Öµ£¬Ð´ÁËÒ»¸öpublic·½·¨²»ÐУ¬Ð´ÁËÒ»¸öÊôÐÔÒ²²»ÐУ¬Çë¸ßÊÖÖ¸µã£¬ÔÚÏߵȺò,´úÂëÈçÏÂ
±äÁ¿ÉùÃ÷
Dim dirName As String = ""
·½·¨
Public Sub UrlName( ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ