ÔÚVBÖÐ,ÈçºÎѸËÙ¸üÌæµØÏÔʾÕýÔÚµ¼ÈëµÄÐÅÏ¢?
¾ßÌåÇé¿ö£º
´Óexcelµ¼Èë´óÁ¿Êý¾Ýʱ£¬ÈçºÎÊÊʱÏÔʾÕýÔÚµ¼ÈëµÄÊý¾ÝÐÅÏ¢£¿
±¾ÈËÖ±½ÓÓÃÒ»¸ölabel¶ÔÏó£º
lable.caption="Õýµ¼ÈëµÄÐÅÏ¢"
ÔÚ³ÌÐòÔËÐÐʱ£¬»ù±¾ÉÏÎÞ·¨ÏÔʾ£º½öÏÔʾһÁ½¸öÐÅÏ¢¶øÒÑ
ÇëÎÊ£¬ÔÚVBÀÈçºÎʵÏÖµ¼Èëʱ£¬Ñ¸ËÙ¸üÌæµØÏÔʾÕýÔÚµ¼ÈëµÄÐÅÏ¢£¿
±ÈÈ磺
´ÓexcelÖе¼Èë´óÁ¿ÓÐÐÕÃû×ֶεÄÐÅÏ¢£¬ÈçºÎÔÚ½çÃæÉÏ£¬Ñ¸ËÙ¸üÌæµØÏÔʾÕýÔÚµ¼ÈëÐÅÏ¢µÄÐÕÃû£¿£¿
лл£¡
lable.caption="Õýµ¼ÈëµÄÐÅÏ¢"
lable.refresh
doevents
¼Ó¸ö½ø¶ÈÌõ¾Í¿ÉÒÔÁË, µ±È»ÁË,½ø¶ÈÌõµÄ½ø¶ÈµÃÄã×Ô¼ºÀ´¼ÆËã, ±ÈÈçÄãÒ»¹²ÓÐ10000Ìõ¼Ç¼Ҫµ¼Èë,ÄÇôÄã¿ÉÒ԰ѽø¶ÈÌõ×î´óÖµÉèΪ10000,ÿµ¼ÈëÒ»Ìõ¼Ç¼½ø¶ÈÌõ¾Í¼Ó1, Ò²¿ÉÒÔ½«½ø¶ÈÌõ×î´óÖµÉèΪ100,ÿµ¼Èë100Ìõ¼Ç¼½ø¶ÈÌõ¼Ó1.
Èç¹ûÄãµÄÊý¾ÝÁ¿±È½Ï´ó,Õû¸öµ¼ÈëµÄʱ¼ä±È½Ï³¤,Äǽ¨ÒéÄã×îºÃ²»ÒªÓÃdoevents, ÒòΪÄÇÖ»»áÈõ¼Èë¹ý³Ì±äµÃ¸üÂý.
¶øÒòΪ½ø¶ÈÌõµÄÏìÓ¦ÓÅÏȼ¶±È½Ï¸ß,ËùÒÔ¼´Ê¹label/textµÈ¿Ø¼þÎÞ·¨ÏìÓ¦µÄʱºò½ø¶ÈÌõ»¹ÊÇ¿ÉÒÔÕý³£ÏÔʾ½ø¶ÈµÄ.
Ã²ËÆÃ¿´ÎrefreshÏ£¿
лл´ó¼Ò!!
Ïà¹ØÎÊ´ð£º
³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ½â¾ö¡£
Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
Picture1.Left = -HScroll1.Value + bcW ' ......
vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£
±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......
°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
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ÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......