¶à¸ö¶¥µã»º´ævbµÄ²Ù×÷
¹²ÓÐ4¸öʾÀý¶¥µã»º´æInstanceVB1£¬InstanceVB2,InstanceVB3£¬InstanceVB4£¬ËüÃǵÄÖµ¶¼ÊÇͨ¹ýÒ»¸öÑ»·½øÐи³Öµ£¬ÇëÎÊ¿ÉÒÔÈçϲÙ×÷Âð£¬Ôõô²Ù×÷ЧÂÊ×î¸ß£¿
InstanceVB1->Lock£¨...);
InstanceVB2->Lock£¨...);
InstanceVB3->Lock£¨...);
InstanceVB4->Lock£¨...);
for()
{
²Ù×÷¸÷ʾÀý¶¥µã»º´æ
}
InstanceVB4->Unlock();
InstanceVB3->Unlock();
InstanceVB2->Unlock();
InstanceVB1->Unlock();
¿ÉÒÔ°¢£¬Ð§ÂÊû²â¹ý£¬¿´Ëã·¨£¬Èç¹ûËã·¨Ò»Ñù£¬ÄÇô·Ö¿ªÐ´¿ÉÄÜcpu»º´æÃüÖÐÂʸßÒ»µã¡£
Èç¹û·Ö¿ªµÄ»°£¬ÄÇFORÑ»·Ôõô°ìÄØ£¬ÒòΪÕâЩVB¶¼ÊÇÔÚFORÑ»·Öеõ½ÖµµÄ¡£
ÄãÒªÊÇ·Ö¿ªÐ´²»·½±ã¾ÍÕâôд°É
Ïà¹ØÎÊ´ð£º
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......
Printer.ScaleMode = 6
6±íʾºÁÃ×
Printer.PaperSize = vbPRPSA4
'³õÊ¼×ø±ê
x = 1
y = 4
'×î´óµÄÏß¿ð
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ
printer.print "dsff"
.....
....
Printer.EndDoc
´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ
sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......
Ò»¸ö¸öΪÁ˳öÃû¾ÓȻʹÓÃ×Ô¼ºµÄÕÕÆ¬³öÀ´ÕÐÒ¡,Çî·èÁ˰É
©°©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤My ѸÀ׵ȼ¶©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©´
so what? disturbed you?
´ó¸ÅºÃ¶àÖ»ÓгõÖбÏÒµ
ÊDz ......