VB ÈçºÎ°´ÒªÇóÑ¡ÖÐcheckbox
¾ßÌåÎÊÌ⣺ ±íµ¥ÉÏÓÐ20¸öcheckbox ·Ö±ðΪ check1 check2 check3 check4 ........check20
Á½¸öÎı¾¿ò£º·Ö±ðΪtextbox1 textbox2
Ò»¸öÃüÁî°´Å¥£º command1
ÐèÒªÍê³ÉµÄÈÎÎñ£ºÔÚÎı¾¿ò1ÊäÈë 3 Îı¾¿ò2 ÊäÈë 7 µ¥»÷ÃüÁî°´Å¥ Ôò check3-----check7 ¸´Ñ¡ÉÏ
Ò²¾ÍÊÇʹµÃcheck3 check4..... check7.value=1 Îı¾¿òµÄÊý×ÖÊÇ¿ÉÒԸıäµÄ£¬±ÈÈçÊäÈë 5 ºÍ 12 Ôò check5-----check12 ¸´Ñ¡ÉÏ Ð»Ð»£¡
Ô±¾ÕâôÏëµÄ£º
ÉèÖñäÁ¿i dim i as integer
for i = val(text1.text) to val(text2.text)
check(i).value=1
next
²»¹ýËƺõ²»ÐУ¬³õѧ Çë´ó¼Ò°ïæ £¬×îºÃÄܸø´úÂë лл
ÓÿؼþÊý×é°¡
Ïà¹ØÎÊ´ð£º
ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿
VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿
1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿
2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......
Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀﶼÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......
±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......
¿´ÁËһЩVB iniÎļþдÈë¶ÁÈ¡µÄ·½·¨ µ«ÊÇ»¹ÊDz»ÖªµÀÔõôд£¬ÉÏÃæдÁ˺ܳ¤ ºÜ¶à£¬µ«ÊÇÎÒ²»ÖªµÀÔõôÓã¬ÎÒÏëÎÊÒ»ÏÂÔõÑùд²ÅÄÜʵÏÖÔÚTEXT1ÖÐд×Ö£¬È»ºóµãCommand1Ìá½»£¬È»ºóTEXT1ÀïÃæµÄÊý×Ö¾Íд½øINIÀïÃæ[Section]µÄKey1 ......