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

ÇóÒ»¸öÍêÕûµÄVB³ÌÐò.ÒªÇóÈçÏÂ

ÓÃVB±àдµÄ³ÌÐò£ºÒªÇó£¬Ò»¸öÃûΪformµÄ´°ÌåÉÏ»­Á½¸öÃüÁî°´Å¥£¬±àдÊʵ±µÄʼþ¹ý³Ì£¬ÔËÐкó£¬Ò»¸ö°´Å¥ÏÔʾ£¬ÁíÒ»¸ö°´Å¥Òþ²Ø£»µã»÷ÏÔʾµÄ°´Å¥£¬´Ë°´Å¥Òþ²Ø£¬ÁíÒ»¸öÏÔʾ£¬Í¬Ñùµã»÷Õâ¸öÏÔʾµÄ°´Å¥£¬Õâ¸ö°´Å¥Òþ²Ø£¬ÁíÒ»¸öÏÔʾ£¡

ÒªÍêÕûµÄ´úÂ룬лл£¡
·ÅÈý¸ö°´Å¥£¬µÚÈý¸ö¼Ç´óµã¡£
VB code:

Private Sub Command1_Click()
Command1.Visible = False: Command2.Visible = True: Command3.Caption = "µÚÒ»¸ö°´Å¥Òþ²ØÁË£¬µÚ¶þ¸öÏÔʾÁË"
End Sub

Private Sub Command2_Click()
Command1.Visible = True: Command2.Visible = False: Command3.Caption = "µÚ¶þ¸ö°´Å¥Òþ²ØÁË£¬µÚÒ»¸öÏÔʾÁË"
End Sub

Private Sub Command3_Click()
Command1.Visible = True: Command2.Visible = True: Command3.Caption = "Á½¸ö°´Å¥¶¼ÏÔʾÁË"
End Sub

Private Sub Form_Load()
Command1.Caption = "ÎÒÏÔʾÁË": Command2.Caption = "ÎÒÏÔʾÁË": Command3.Caption = "Á½¸ö¶¼ÏÔʾÁË£¡"
End Sub




VB code:

Private Sub Command1_Click()
Form1.Command2.Visible = True: Form1.Command1.Visible = False
End Sub

Private Sub Command2_Click()
Form1.Command1.Visible = True: Form1.Command2.Visible = False
End Sub

Private Sub Form_Load()
Form1.Command1.Caption = "ÏÔʾ°´Å¥2"
Form1.Command2.Caption = "ÏÔʾ°´Å¥1&quo


Ïà¹ØÎÊ´ð£º

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ

ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

VBÖÐÈçºÎʵÏÖÒ»PC¿ØÖÆN̨PC»úÄØ£¿ - VB / ¶àýÌå

ÈçÌ⣬VBÖÐÈçºÎʵÏÖÒ»PC¿ØÖÆN̨PC»úµÄ¿ª¹Ø»ú»òÕ߯äËûÃüÁîÄØ£¿
Õâ¸öÎÊÌâÓеã´óŶ.Èç²»ÄÜÔÚÆäËü»úÆ÷ÉÏÒ²×°³ÌÐòµÄ»°,ÄÇÖ»Òª¿´ËûÃÇÓÐûÅäÖÃÓÐÔ¶³Ì¿ØÖÆ¿ª¹Ø»úÁË

Èç¹ûÊÇÄÇÖÖ¿Í»§/·þÎñ¶ËµÄ·½Ê½ £¬¾ÍÊDZ»¿ØÖÆPCÒ²ÐèÒª°²× ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ