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

vbÆô¶¯ÍⲿӦÓóÌÐòµÄÎÊÌâ

ÓиöÍⲿӦÓóÌÐò(myapp.exe)£¬Æô¶¯Ç°£¬ÐèÒªÉèÖû·¾³±äÁ¿£¬²ÅÄÜÆô¶¯
Õâͨ³£ÊÇͨ¹ý±àдһ¸öÅú´¦Àí³ÌÐò£¬À´Íê³É£¬
ÀýÈç:
==== start.bat ===
set HOME_FOLDER='c:\app'
set TEMP_FOLDER='c:\temp'
myapp.exe

ÔËÐÐstart.bat¼´¿ÉÕýÈ·Æô¶¯myapp.exe

ÏÖÔÚ£¬ÐèÒªÓÃvbÀ´¿ØÖÆÕâ¸ö³ÌÐòµÄÆô¶¯ºÍÍ˳ö£¬Õâ¸öÎÒÖªµÀ¿ÉÒÔÓÃSystem.Diagnostics.ProcessÀ´ÊµÏÖ
µ«ÊÇÈç¹ûÓÃProcessÆô¶¯start.batÔò»á³öÏÖÒ»¸ödos´°¿Ú£¬ÎÒ²»Ïë¿´µ½Õâ¸ö´°¿Ú
Èç¹ûÖ±½ÓÆô¶¯myapp.exeÔò»áÒòΪ»·¾³±äÁ¿Î´ÉèÖú㬶øµ¼ÖÂmyapp.exeÔËÐв»³É¹¦

ÓÐʲô°ì·¨¿ÉÒÔÓÃvbÏÈÉèÖû·¾³±äÁ¿£¬È»ºóÆô¶¯myapp.exeÂð£¿

³ÐÃɴͽ̡¢²»Ê¤¸Ð¼¤

process.StartInfo.CreateNoWindow=true

ÓÃc#ÉèÖû·¾³±äÁ¿£¬Ó¦¸Ã»¹ÊÇÐèÒªµ÷ÓÃϵͳuser32.dllÁ´½Ó¿â£¬Äã¿ÉÒԲο¼http://zhidao.baidu.com/question/53584405.html

ËÑһϣºÅú´¦Àí Òþ²ØCMD´°¿Ú

¿ÉÒÔÔÚ´úÂëÀïÉèÖû·¾³±äÁ¿:
Environment.SetEnvironmentVariable("PATH", path);

ÓÃSystem.Diagnostics.ProcessÀ´ÊµÏÖ¿ÉÒÔÉèÖóɲ»ÏÔʾdos´°¿ÚµÄ

Dim psi As New System.Diagnostics.ProcessStartInfo
With psi
    .CreateNoWindow = True
    .FileName = System.IO.Path.Combine(Application.StartupPath, "start.bat")
    .WindowStyle = ProcessWindowStyle.Hidden
End With
System.Diagnostics.Process.Start(psi)

ͬÒâÂ¥ÉÏ¡£»·¾³±äÁ¿¡£ÔÚ.netÏÂÒ²¿ÉÒÔÉèÖá£

ÒýÓÃ
¿ÉÒÔ


Ïà¹ØÎÊ´ð£º

asp.net(vb)ÎÊÌâ

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......

vb´òÓ¡ÎÊÌâ


Printer.ScaleMode = 6
6±íʾºÁÃ×
Printer.PaperSize = vbPRPSA4

'³õÊ¼×ø±ê
x = 1
y = 4


'×î´óµÄÏß¿ð
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......

ÇëºÃÐÄÈ˰ïÎÒ°ÑVBÔ´ÂëתΪVB.NET~

Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..


Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html

תΪVB.NETÔ´Âë.

СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ

ÎÒµÄEMAILÊÇ:4452 ......

VBÁ¬½ÓÊý¾Ý¿â²éѯ³¬Ê±ÎÊÌâ

ÔÙVBÄ£¿éÖÐÎÒÊÇͨ¹ýÈçÏ·½Ê½À´Á¬½ÓÖ÷¿âºÍÀúÊ·¿âµÄ(ÀúÊ·¿âÊý¾ÝÁ¿´ó)
VB code:

Public Connstr As String
Public objConn As New ADODB.Connection
Public ConnHISstr As String
Public objConnHIS As New A ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ