vbдÈëÎÊÌâÇó½Ì´óϺ
ÎÒÓÃprintÓï¾äдÈë¶«Î÷ÊDz»ÊÇ×Ô¶¯»»Ðа¡£¿ÎÒ²»Ï£Íû»»ÐУ¬Ôõô½â¾ö£¿
eg£º
for n=0 to k
print #2£¬c£¨n£©
next n
×îºóÎļþ2ÖÐÎÒ´ò¿ª¿´ÁËһϣ¬ËûÊý×écÖеÄÿ¸öÔªËØµ¥¶ÀÒ»ÐУ¬µ«ÊÇÎÒѧҪÕû¸öc£¨£©¶¼ÔÚÒ»ÐÐÉÏ£¬Õ¦°ì£¿£¿£¿£¿£¿£¿£¿£¿
»¹ÊÇÎÒµÄc£¨n£©ÖÐÓлسµµÄ×Ô·û°¡£¿
Çó½Ì´óϺ¡£¡£¡£
for n=0 to k
str = str & c£¨n£©
next n
print #2£¬str
×îºó¼Ó·ÖºÅ(;)
for n=0 to k
print #2,c(n);
next n
Print # ºóÃæ¼Ó·ÖºÅ»ò¶ººÅ¡£
ÔÚ next n ºóÃæ¼ÓÒ»¾ä£º
Pring #2
Õâ¾äʹ c() Êä³öÍê±Ïºó£¬Äܹ»»»ÐС£
Ïà¹ØÎÊ´ð£º
Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..
Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html
תΪVB.NETÔ´Âë.
СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ
ÎÒµÄEMAILÊÇ:4452 ......
ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......
¸÷λ´óϺ£º
ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......
µÚÒ»´Î½Ó´¥CrystalReport
¼±Ñ°ÕÒVb.net Access ͨ¹ý²éѯ³öµÄÊý¾ÝÊä³öµ½CrystalReportµÄÀý×Ó.
ÓеÄÅóÓÑÂé·³·¢À´Ñ§Ï°.¶àл!
¸úÄãµÄÒªÇó²î²»¶à£¬²Î¿¼Ò»Ï£º
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
Private Sub Form_Load()
recs = Adodc1.Recordset.RecordCount 'Çóµ±Ç°¼Ç¼Êý
If recs > 0 Then 'ÒÑÓп¼Éú
Adodc1.Recordset.MoveLast 'ÒÆµ½×îºóÒ»Ìõ¼Ç¼
num = V ......