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

VB ADODCÐÞ¸ÄÊý¾Ý

ÇëÎÊÏÂÀûÓÃADODC¿Ø¼þÈçºÎÐÞ¸ÄÊý¾Ý¿âµÄijһ¸öÖµ£¿ÎÒÔÚÀûÓÃÎı¾°ó¶¨Êý¾Ý¿âµÄÇé¿öÏÂÏÔʾ³öÊý¾Ý£¬µ«ÊÇÔÚÐÞ¸ÄÆäÖеÄijһ¸öÖµµÄʱºò£¬ÀûÓà           Adodc1.Recordset.Update 
                        Adodc1.Refresh ´úÂë¸üб£´æ£¬È´·¢ÏÖûÓб£´æÁË£¬ÊÇʲôԭÒò£¿¸ÃÈçºÎ½â¾öÄØ£¬Çë´óÏÀÖ¸½Ì
Adodc1.Recordset.addnew
Adodc1.Recordset.fields("name").value="ÕÅÈý"
Adodc1.Recordset.fields("age").value=30
Adodc1.Recordset.Update 
Adodc1.Refresh

лл£¬ÎÒÂíÉϸĴúÂëÊÔÏÂ

´óÏÀ£¬ºÃÏñʵ¼ÊÉϲ»¿ÉÐУ¬ÎÊÌâÊÇÕâÑùµÄ£¬ÎÒÓÐÒ»¸öÎı¾°ó¶¨Êý¾Ý¿â£¬ÄÚÈÝÊÇ´òÓ¡´ÎÊý£¬ÔÚÎÒµãÏ´òÓ¡µÄʱºòÕâ¸öÎı¾ÀïÃæµÄÊý×Ö×Ô¶¯Ôö¼Ó1£¬Ö®ºó±£´æµ½Êý¾Ý¿â£¬¾Í¸ÄÕâÒ»¸öµØ·½£¬Ö¸½ÌÏ£¬´ó¸ç£¬¸ø¸ö´úÂ룬лл

ÎÒÊÔ¹ý£¬Ã»ÎÊÌâ
VB code:
Option Explicit

Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=microsoft.jet.oledb.4.0;data source=E:\Access DB\Database1.mdb;"
Adodc1.RecordSource = "select top 1 ÊýÁ¿ from T1"
Adodc1.Refresh
End Sub

Private Sub Command1_Click()
Text1.Text = Val(Text1.Text) + 1
Adodc1.Recordset.addnew
Adodc1.Recordset.fields("ÊýÁ¿").Value = Val(Text1.Text)

Adodc1.Recordset.Update
Adodc1.Refresh
End Sub


лл£¬ÎÊÌâ½â¾öÁË


Ïà¹ØÎÊ´ð£º

ΪʲôÓÃVB¸Ä±ä²»Á˹¤¾ßÀ¸°´Å¤µÄ¿í¶È - VB / ¿Ø¼þ

Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔ­À´µÄÊýÖµÁË

´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£

»Ø¸´ ......

ÓÃVB±àдTXTÎĵµ - .NET¼¼Êõ / VB.NET

ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ

googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ

Ö±½Óµ÷²éÓþͿÉÒÔÁË

Ãæ¶ÔÃÀÅ® ......

VB µÄ PictureBOX ¿Ø¼þ»æÍ¼ÎÊÌâ - VB / ¿Ø¼þ

³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ­½â¾ö¡£
  Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
  Picture1.Left = -HScroll1.Value + bcW ' ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
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×öÔ¶³ÌÉÏ´«ÎļþʱµÄ½ø¶ÈÌõ£¿

ÎÒÔÚÓÃVBдһ¸ö½«ÊÓÆµÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡
ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£
¹À¼ÆÏ° ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ