´ÓVBתÐÐVB.NET~~~¿ªÊ¼µÄʱºòÈçºÎѧ»ù´¡ÈëÃÅ°¡~
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀﶼÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£
¶øż¶ÔAPIÒ²±È½ÏÁ˽⣬¶ÔWindowsÏûÏ¢»úÖÆҲͦÁ˽âµÄ~
ż¾ÍÊÇÒòΪÔÚVB6ÀïÃæ´´½¨¶àÏß³ÌÏë¸ÉµãBT¹¤×÷£¬µ«ÊÇVB´´½¨ÊÇOKÁË£¬µ«ÊǼ¸ºõ·âɱÁË90%µÄAPIºÍ100%µÄÎļþ²Ù×÷ÒÔ¼°´°ÌåÊôÐÔ²Ù×÷£¬Ê¹ÓöàÏß³ÌÊÇÄÜÖ´ÐÐÁË£¬µ«ÊÇÏß³ÌÖ´ÐÐÍê³Éºó²»¹ÜÁ¢¿ÌKILLÏ̻߳¹ÊÇÔÝÍ£Ï̶߳¼ÈÃVBÕû¸ö³ÌÐò±ÀÀ£ÁË~~~ÎÒÔΣ¬ÓÐÈ˾ͺÍÎÒ˵VB.NET£¬¶øºó¿´ÁËVB.NETÕæ¸Ð¾õѧVBÀÏÁË~~~
ÏÖÔÚżÒѾ°²×°Íê³ÉVS2008ÁË~¾ÍÊǸÃÈçºÎתÐа¡~
ÍƼö¼¸±¾ÈëÃÅÊéż¿´¿´£¬¹Ø¼ü¾ÍÊÇÀïÃæµÄһЩÓï·¨¡¢Àà¿â¡¢»òÕßÆäËûʲôµÄ~~~
»òºÍ˵ϺÍVBµÄ²î±ð°¡£¬ÐÂÈ˸Ã×¢Òâʲô°¡£¬´úÂë½á¹¹¡¢ÖÊÁ¿¡¢¹æ·¶°¡~~~
żÊÇ×¼±¸Ñ§ºÃVB.NETºóÔÙ¶ÈתÐÐC#²ÅÓеãǰ;£¬×ÜÖ®ÎÒ¾ÍÊǸöÖ»´ò¿ª¹ýÒ»´ÎVB.NETµÄ²ËÄñ£¬´ó¼Ò°ïæ°¡~~~
ÕÒ±¾ÃæÏò¶ÔÏó±à³ÌµÄÊéºÃºÃ¿´¿´£¬²»»áÃæÏò¶ÔÏ󣬿´VB.net¸ù±¾¿´²»¶®µÄ¡£ÃæÏò¶ÔÏó±à³ÌµÄÊéºÜ¶à£¬javaºÍc++µÄÎÒ¶¼¿´¹ýЩ£¬¸Ð¾õÀïÃ涫Î÷ºÜ¶àÊÂÏàͨµÄ¡£
µÈÄãÏ°¹ßÁ˾ͺÃÁË£¬vb.net±Èvb6ºÃÓöàÁË¡£
LZ,¸øÄãÍƼöÒ»±¾²»´íµÄÊ飬ÎÒÒ²ÊÇ°ë¸öÔÂÇ°½Ó´¥µÄ VB.NET,
ºÚħ·½ ϵÁеÄ
visual basic.net »ù´¡½Ì³Ì
Íõ½øÇ¿ ±àÖø
Ç廪´óѧ³ö°æµÄ
ÎÒ¿´¹ýÁ½±¾ÃÀ¹úÈËдµÄvbVB.NetµÄ»ù´¡ÈëÃŵÄÊ飬¸Ð¾õºÜ²»´í£¬°ÑNetµÄÌص㶼½²Á˽²£¬²»¹ýÍü¼ÇÊÇʲôÊéÁË£¡
ºÇºÇ£¬Æäʵvb6ÒÔºó¾ÍÖØÐÂÃüÃûΪvb.netÁË£¨ÔÚvs2002ÀïµÄvb7¾ÍÊÇvb.net£©¡£ËùÒÔÑϸñÀ´Ëµ£¬vb.netºÍvbÊÇÒ»¼Ò¡£
vb6£¬Ê±¹âÍ£ÁôÔÚ1998Äê¡£¶øvb.net²»¶Ï·¢Õ¹µ½½ñÌ죬ÔÚvs2010¿ªÊ¼¾Ý˵Ҫ
Ïà¹ØÎÊ´ð£º
Printer.ScaleMode = 6
6±íʾºÁÃ×
Printer.PaperSize = vbPRPSA4
'³õʼ×ø±ê
x = 1
y = 4
'×î´óµÄÏß¿ð
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
±ÈÈç½ø³Ì¼ÓÔØеijÌÐò¡£
ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£
È»ºóÔÊÐíºó·ÅÐС£
±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£
¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£
ÉèÖ ......
ÎÒÓÐ×Ô¶¯Éú³ÉÐòÁкŵijÌÐò£¬µ«ÊÇÔõô¸ú´ò°üºóµÄ°²×°³ÌÐò½áºÏÔÚÒ»Æð£¬ÔÚ°²×°Ê±ÌáʾÓû§ÊäÈëÐòÁкţ¬ÕýÈ·ºóÔÙ¼ÌÐø°²×°£¿£¿£¿
·½·¨1£ºÄã¿ÉÒÔÔÚÔËÐгÌÐòºóÊäÈëÐòÁкÅ×¢²á£¬ºÜ¶àÈí¼þ¶¼ÊÇÕâÑùµÄ¡£
·½·¨2£ºÊ¹ÓÃSetu ......
TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> "
´ó¼ÒºÃ£¬ÎÒÓÃÉÏÃæÒ»¸ö¶«Î÷¸³Öµ TF1.text = & ......
Ò»¸ö¶àÐеÄtext
Èç¹û°ÑÿһÐзÅÈëÒ»¸ö×Ö·û´®ÉÏÄØ?
lineinput
VB code:
Private Sub Command1_Click()
Dim TextLine
Open "d:\test.txt" For Input As #1 ' ´ò¿ªÎļþ¡£
Do Whi ......