VB µ÷ÓÃϵͳ¼ÆËãÆ÷
ÎÒÖªµÀÔÚVBÖе÷ÓÃϵͳµÄ¼ÆËãÆ÷ ¿ÉÒÔÓÃshell ¿ÉÊÇÒªÊÇÒªÇó¸ßµã µ÷Óúó Ö±½Ó¼ÆËã ²¢°Ñ¼ÆËã½á¹ûÏÔʾÔÚÎı¾¿òÀï ±ÈÈç ÔÚµã»÷°´Å¥1 µ÷ÓüÆËãÆ÷ °ÑÖ¸¶¨µÄ¶þ½øÖÆ×ª»»Îª16½øÖÆ ²¢ÏÔʾÔÚ text1
×ÔÒÑ×öÒ»¸ö¼ÆËãÆ÷~~~ ¼ÆËãÆ÷¿ÉÒÔ¸´ÖÆÕ³ÌùµÄ¡£¡£¡£ sendkeys ²»Óõ÷ϵͳµÄ¼ÆËãÆ÷£¬²Î¿¼×ÔÒÑ×öµÄ VBдµÄ½øÖÆ×ª»» http://download.csdn.net/source/1212613 ¶ÔÍ·,΢ÈíÓиöÀý×Ó¾ÍÊÇÓÃSendKeys ÒýÓà ¼ÆËãÆ÷¿ÉÒÔ¸´ÖÆÕ³ÌùµÄ¡£¡£¡£ sendkeys <DIV> </DIV> <TABLE borderColor=#cd5c5c height=350 width=450 align=center border=3> <TBODY> <TR> <TD background=http://hiphotos.baidu.com/%B5%CE%B5%E3%D6%AE%C3%CE/pic/item/5581ce7b6f8fd2c12f73b360.jpg> <DIV align=center> <MARQUEE scrollAmount=1 scrollDelay=100 behavior=slide loop=1 width=450 height=350> <MARQUEE style="LINE-HEIGHT: 50%; WRITING-MODE: tb-rl" mce_style="LINE-HEIGHT: 50%; WRITING-MODE: tb-rl" scrollAmount=1 scrollDelay=100 direction=up width=450 height=290> <P align=left> <FONT style="FONT-SIZE: 18pt; FILTER: WIDTH: 100%; COLOR: #ea0000; LINE-HEIGHT: 130%; FONT-FAMILY: Ñà¸èÐÐ" mce_style="FONT-
Ïà¹ØÎÊ´ð£º
Printer.ScaleMode = 6 6±íʾºÁÃ× Printer.PaperSize = vbPRPSA4 '³õÊ¼×ø±ê x = 1 y = 4 '×î´óµÄÏß¿ð Printer.DrawStyle = 0 Printer.Line (x, y)-(x + 132.5, y) ......
×Ö·û´® m1="E" ×Ö·û´® m2="F" Èç¹ûtext1.text=m1+m2µÄ»° Ôòtext1ÏÔʾµÄÊÇ EF µ«ÊÇÈç¹û ×Ö·û´® m1="E" ×Ö·û´® m2="6" Èç¹ûtext1.text=m1+m ......
ÎÒÒªµ¼Èëµ¼³öÊý¾Ý¿âÎļþ£¬ÔÚµ½´¦µÄʱºòʹÓÃÁí´æÎª¶Ô»°¿ò£¬¾ßÌå´úÂëÊÇÈçºÎʵÏֵģ¿ÎÒÖ±½ÓÓÃcommondialog1.showsaveÖ®ºóµãÁí´æÎªÃ»ÓÐÏìÓ¦£¬ÊDz»ÊÇÒªÌí¼Óʲô´úÂ룿¼±£¡ Áí´æÎªÊ²Ã´¸ñʽµÄÎļþÄãÐèÒª¸æËß´ó¼Ò,дµ½²»Í¬À ......
Open App.Path & "\tu\hb.bmp" For Binary As #100 ÓÃopenÓï¾ä´ò¿ªÎļþ,ÎÒÏëÓÃifÓï¾äÅжÏÕâ¸öÎļþÊÇ·ñ´ò¿ª,¾ÍÊÇ˵Èç¹ûû´ò¿ª,¾Í´ò¿ª,ÇëÎʸ÷λÅóÓÑÔõôд? ÊÇ·ñ´ò¿ªÊÇÖ¸ÊÇ·ñÒѾÓû±Ê´ò¿ªÁËô?»¹Ê ......