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

Çëvb¸ßÊÖ°ïæ

VBÖвåÈëExcel´°Ìå²¢ÇÒExcelµÄÿһÐж¼¿ÉÒÔÒÔ²»Í¬µÄÑÕÉ«ÏÔʾ
ÉÏ´ÎÎÒ°ïÄã½â¾öÎÊÌ⣬·ÖÈ´¸øÁ˱ðÈË

¶Ô²»ÆðÄÇÊÇÎÒ¿´´íÁ˰¡ Õâ´Î²»»á°¡
ÎÒµ±Ê±¼±×Åϰà


ÕâÁ½¸öÌû×Ó½áÁ˰É

http://topic.csdn.net/u/20091029/11/02e04601-b428-44eb-ac0c-57ff54282a8b.html

http://topic.csdn.net/u/20091029/11/9906512a-bd23-40cc-9d70-a333c92f7871.html

½á¹ýÁË  ºÇºÇ  ÏÖÔÚ»¹¿ÉÒÔ¼ÌÐø°ïÎÒÂð£¿


Á½ÖÖ·½·¨£º
1¡£¹¤³Ì——¡µ²¿¼þ——¡µ¿É²åÈë¶ÔÏó——¡µmicrosoft excel ¹¤×÷±í

2¡£¹¤³Ì——¡µ²¿¼þ——¡µ¿Ø¼þ——¡µmicrosoft office web components 11.0

lzÒªÓõÄÊÇÄÄÒ»ÖÖ£¿

¿ÉÊÇÔÚExcelÖл¹ÒªÇóÿÐпÉÒÔÓò»Í¬µÄÑÕÉ«ÏÔʾ°¡ 
Õâ¸öÔõôʵÏÖ£¿


ÎÒÓõÚÒ»ÖÖ°É
¿´ÆðÀ´¼òµ¥µã
ºÇºÇºÇ

µÚÒ»ÖÖ¿´ÆðÀ´²»ÃÀ¹Û

Ŷ ÄǾÍÓõڶþÖÖ°¡  Äã¸Ð¾õÄÇÖֺþÍÄÇÖֺð¡


VB code:
Private Sub Command1_Click()
Dim lngRow As Long
Dim intMod As Integer

With Spreadsheet1.ActiveSheet
For lngRow = 1 To 50
intMod = lngRow Mod 5


.Rows(lngRow & ":" & lngRow).Interior.ColorIndex = intMod + 1
Next lngRow
End With

End Sub


Ôõôû»ØÒôѽjhone99
ÎÒ»¹ÓÐÒ»¸öÎÊÌâÔÚvbÀï¿ÉÒÔ


Ïà¹ØÎÊ´ð£º

VBÈçºÎÁªÏµÁ½¸ö´°Ì壿

¾ÍÊÇÉè¼ÆÒ»¸ö¼ÆËã»úÄ£Ä⿼ÊÔϵͳ£¬´øÓÐѧÉúºÍ¹ÜÀíÔ±£¬ËùÒԵǼ´°ÌåºÍÖ÷´°ÌåÏë·Ö¿ª£¬µÇ½ѧÉúµÄÏÔʾѧÉúµÄÖ÷´°Ì壬µÇ½¹ÜÀíÔ±ÏÔʾ¹ÜÀíÖ÷´°Ì壬ÎÒÖ»»áÒ»¸ö´°ÌåÓÃÒ»¶Ñ¿Ø¼þ£¬ÏÖÔÚÏíÓжà¸öÖ÷´°Ì壬²»ÖªµÀÔõô×ö£¬Ï£ÍûÇë´ó ......

vbÄÜ·ñ°Ñwinsock¿Ø¼þ·â×°µ½dllÖÐ

vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......

VBÖÐÔõôÑùÔÚ±í¸ñÖÐÐÞ¸Ä×ÖÌ壿 - VB / »ù´¡Àà

±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......

vb²åÈëÊý¾Ý¿âÖØ¸´ÖµÎÊÌâ

ÔÚvbÖÐÔõôÅжϣ¬²åÈëµ½Êý¾Ý¿âÖеÄÖµÊÇÖØ¸´µÄ£¬±¾È˲ŸսӴ¥VBÓïÑÔ£¬ÉõÊÇÓÐºÃ¶àµØ·½»¹²»¶®£¬»¹Çë¸÷λ´óÏÀÃǸø³ö´úÂ룬ллÁËѽ£¡£¡£¡
²åÈë֮ǰselectһϰ¢¡£
»òÕßдһ¸ö×éºÏSQL²åÈëÓï¾ä£¬ÀýÈç
IF not Exist(
& ......

vb¿ØÖÆGPRS MODEM²¦ºÅ

ÎÒÏë×ö¸öÓÃvb6×öµÄ³ÌÐò£¬¿ÉÒÔ¿ØÖÆGPRS MODEM²¦ºÅ£¬È粦ÎÒ×Ô¼ºµÄÊÖ»ú
¿ÉÒÔ°¡
ÄãÏÈϸöATÃüÁºÏѧϰѧϰ

ÎÒÀ´¶¥

¶¥Ìù

LZºÃÀ÷º¦

²»¶¥²»ÐÐ

ÀÏÊÇÅÅMP
ÒýÓÃ
LZºÃÀ÷º¦
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ