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

VBµ÷ÓÃcmd

ÎÒÏëÓÃVB×ö¸ö´ÅÅÌÐÞ¸´³ÌÐò.ÔÚ½çÃæÉÏÓиötext1,ÔÚÀïÃæ¿ÉÊäÈëÅÌ·û,ÊäÈëÅÌ·ûºóµã"¿ªÊ¼"°´Å¥,¼´¿É¶Ôtext1.textÖÐËùÊäÈëµÄÅÌ·û½øÐÐÐÞ¸´.ÎÒËùÓõĴúÂëÊÇ:Shell "CHKDSK text1.text:/F".µ«²»ÄÜʵÏÖЧ¹û,Çë¸ßÊÖÖ¸½Ì.Áí:ÄÜ·ñʵÏÖ²»ÏÔʾcmd½çÃæ,µ«ÐÞ¸´ÍêºóÄÜÒÔmsgbox½øÐÐÌáʾ?лл
Shell "CHKDSK text1.text:/F",0
²»ÏÔʾcmd½çÃæ


shell "chkdsk " & text1.text & " :/F" ,0

ÓÃmsgboxÏÔʾ½á¹û²»ºÃ×ö¡£

¿ÉÒÔÓÃ"ÖØ¶¨ÏòÃüÁî"°Ñ½á¹û´æµ½ÎļþÖУ¬ÔÚ´ò¿ªÎļþ£¬ÓÃmsgbox ÏÔʾ¡£



ÄÜ·ñÔÚÐÞ¸´ÍêºóÁíÒÔÌáʾ¿òµÄÐÎʽ½øÐÐÌáʾ?
Áí:ÎÒÊÔ¹ýShell "CHKDSK text1.text:/F",µ«¾ÍÊÇû·´Ó³,Ò²²»¼ûcmd´°¿Úµ¯³ö.

Shell "CHKDSK" & Text1.Text & " :/F"  ÔÚ¿ªÊ¼Ð´µÄʱºòÎÒÒ²ÊÔ¹ýÁË,Ò»µ÷ÊÔ¾ÍÌáʾÎļþδÕÒµ½.

VB code:
Shell "CHKDSK.exe" & " " & Text1 & "/F", vbHide


Shell "CHKDSK.exe" & " " & Text1.Text & "/F"  û·´Ó¦.

Shell "CHKDSK.exe" & " " & Text1.Text & ":/F"  ¿ÉÒÔʵÏÖЧ¹û.¼ÓÁËvbHideËäÈ»¿ÉÒÔÈÃcmd´°¿Ú²»ÏÔʾ,µ«Ôõô²ÅÄÜÖªµÀ´ÅÅÌÒÑÐÞ¸´Íê³ÉÁËÄØ?

ÐÞ¸´Íê³ÉºóµÄÌáʾ´úÂëÎÒÒÑÍê³É,²¢²âÊÔOK.лл¸÷λÈÈÐĵİïæ.


Ïà¹ØÎÊ´ð£º

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

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

ÓÃVB±àдTXTÎĵµ - .NET¼¼Êõ / VB.NET

ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ

googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ

Ö±½Óµ÷²éÓþͿÉÒÔÁË

Ãæ¶ÔÃÀÅ® ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

¹ØÓÚVB.NETºÍMS ACCESSµÄÎÊÌâ

ÎÒдÁËÒ»¸öÈí¼þ£¬ÒªÓõ½ACCESSÊý¾Ý¿â£¬ÎÒÔÙ·ÃÎÊACCESSµÄʱºò£¬ÎÒÐèÒª´Ó±íÀï¶Á³öÒ»ÐÐÊý¾Ý£¬ÎҵijÌÐòÊÇÕâÑùдµÄ£¬SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......

ÓÐûÓÐFOR VB Ë®¾§±¨±íµÄÊé»òÊǵç×ÓÎĵµ°¡

ÓÐûÓÐFOR VB Ë®¾§±¨±íµÄÊé»òÊǵç×ÓÎĵµ°¡£¿ÓÐÐÅÏ¢µÄÅóÓѸæËßÏ ллÁË
ÎÒҲûÕÒµ½

Èç¹ûÄãÓÐ FOR ÆäËü µÄÎĵµ£¬Ò²¿ÉÒԲο¼°É£¡
¡®µÀÀí¡¯ÊÇÒ»Öµģ¬Ö»ÊÇ¡°±í´ï·½Ê½¡±²»Í¬¶øÒÑ¡£


mark

pls learn from ba ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ