vb eof(1)
ΪÄúÕÒµ½ÒÔÏÂÏà¹Ø´ð°¸
vbÖÐ S1 = S1 & S & IIf(EOF(1),"",vbCrLf)ÊÇʲôÒâ˼...
ÕâÀïµÄvbCrLfÊǻسµµÄASCIIÂë,¼´CHR(13) ÆäÖеÄEOF(1)ÊÇÅжÏÎļþ½áÊøµÄº¯Êý,À¨ºÅÖеÄ(1)Ö¸µÄÊÇ1#Îļþ,Èç¹ûÎļþ½áÊøÁË,´ËÖµÎªÕæ,·ñÔòΪ¼Ù. ¶øIIFÊÇÒ»¸ö¸ù¾Ý±í´ïʽµÄ...
VB EOF(1) ʲôʱºòÓÃ
dim inputdata as string open "text.txt" for input as #1 '´ò¿ªÎļþtext.txt£¬ÎļþºÅΪ1 do while not eof(1)'¶ÁÎļþ£¬Ò»Ö±¶Áµ½Îļþβ input #1,inputdata'½«...
vbÖеÄEoFÊÇʲôÒâ˼
EOFΪEnd Of FileµÄËõд£¬ÔÚ²Ù×÷ϵͳÖбíʾ×ÊÁÏÔ´ÎÞ¸ü¶àµÄ×ÊÁϿɶÁÈ¡¡£DO while not EOF(1)½âÊÍ£ºÅжϵ±eof(1)µÄֵΪtrueʱֹͣdoÑ»·¡£Ê¹ÓÃEOFÊÇΪÁ˱ÜÃâÒòÊÔ...
VBÎļþϵͳ±à³ÌÖеij£Óú¯Êý - °Ù¶È¾Ñé
Ò²¿ÉÒÔΪÊôÐÔ³£Êý¶ÔÓ¦µÄÖµGetAttr·µ»ØÖµ±íÈçÏ£º³£Êý---Öµ---ÃèÊövbnormal---0---³£¹ævbReadonly---1---Ö»¶ÁvbHidden---2---Òþ²ØvbSystem---...
VBÖеÄEOFºÍLOFº¯ÊýÊÇʲôÔõôÓÃ
If EOF(1) Then 'Îļþ#1ÒѶÁÈ¡Íê±ÏElse '¼ÌÐø¶ÁÈ¡Îļþ#1End IfLOF£¨Length Of File£©- Îļþ³¤¶È£¬ÆäÖµÊÇÎļþµÄ×ܳ¤¶È£¨×Ö½Ú£©£ºPrint LOF(1) 'ÏÔʾÎļþ#1...
VBÖеÄEOFºÍLOFº¯ÊýÔõôÓÃ?
eof() º¯ÊýµÄ×÷ÓÃÊÇÅжÏÊÇ·ñµ½Îļþβ.ÀýÈ磺dim s as string open "c:\1.txt" for input as #1 do while not eof(1)line input #1,s print s loop close #1...
VB¶ÁдTXTÎĵµµÄ·½·¨(±àд¸öÈËÈռDZ¾Èí¼þ) - °Ù¶È¾Ñé
1 ´ò¿ªVB6.0£¬Ð½¨±ê×¼EXE¹¤³Ì£¬°Ú·ÅÒ»¸öTextBox¡¢Á½¸öCommandButton¿Ø¼þ£¨Î»ÖÃËæÒâ°Ú·Å£¬´óСÈÎÒâ²¼¾Ö£¬ÍƼöÈçͼλÖã©¡£2 °ÑTextBox¿Ø¼þµÄTextÊôÐÔ¸ÄΪ...
VBÎı¾±à¼Æ÷´úÂë
VBÎı¾±à¼Æ÷´úÂëÒª´úÂ룬Ҫ´úÂ룬ÓÐʵÀýµÄ»°×îºÃDim gaibian As Boolean Dim shijian As String Private Sub baocun_Click() CommonDialog1....
VB Çë½Ì´óÉñΪʲôÎҵijÌÐò»áËÀÑ»·?
ÔÚÄãµÄDoÑ»·ÖУ¬²¢Ã»ÓжԴò¿ªµÄÎļþ×öÈκζÁд²Ù×÷£¬ÎļþÖ¸ÕëһֱͣÁôÔÚÆðʼλÖã¬ËùÒÔ EOF(1) µÄֵʼÖÕΪFalse£¬ËùÒÔÑ»·ÎÞ·¨Í˳ö£¬ÐγÉÁËËÀÑ»·¡£
VB´úÂëÖÐµÄ not EOF(1)ʲôÒâ˼°¡?
µ±#1ºÅÎļþûÓе½Î²²¿Ê±. Do While µ±#1Îļþûµ½Î²²¿Ê±Ñ»·, µ½Î²Í£Ö¹ Input # 1£¬inData Text1.Text=Text1.Text+inData Loop ...