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

vb.net²Ù×÷Êý¾Ý¿âÖ®ACCESS£¨1£©

  Ò»Ö±ÏëдÏÂÊý¾Ý¿â²Ù×÷·½ÃæµÄ£¬Ö»ÊÇûʲôʱ¼ä£¨ºÃÏñÊǽè¿Ú£¬Ó¦¸ÃÊÇÀÁ»òÕßûÐÄÇé°É£¬ºÇºÇ£©¡£×î½ü·¢ÏÖCSDNÉÏ
»¹ÊÇÿÌìÓÐÈËÒªÎÊÕâЩÄÚÈÝ£¬ÎÒÓеÄʱºò¾ÍÀÁµÄ»Ø´ð£¬ºÇºÇ£¬Ö÷Òª²»¶ÏµÄÈ¥ÕÒ´úÂë¸øËûÃÇÀÛ°¡¡£ËùÒÔ»¹ÊÇÌý¸ßÈ˵ģ¬À´
¸öÒ»ÀÍÓÀÒÝ£¬×Ô¼ºÖØÐÂÎÂϰÏ£¬Ò²ºÃ¸øÆäËûÈËһЩ°ïÖú¡£
 
    Õâ¸öÊý¾Ý¿â²Ù×÷ÎÒ»áд¸öϵÁÐÐԵİɣ¬ ÏÈдACCESS¡£²»ÖªµÀÕâ¸öһƪÄÜд¶à³¤£¬²»ÐÐÎÒÒª·Ö¼¶ÆªÁË¡£
    ÆäʵACCESSµÄ²Ù×÷»ù±¾¶¼ÆäËûÊý¾Ý¿âÒ»¸öÑù£¬Ö»Êdz¤µÄ²»Ò»Ñù£¬´ó¼ÒÓÐÖÖη¾å»¹ÊÇİÉú£¿ÆäʵÊÇÖ½ÀÏ»¢À²¡£
    ºÃÁË£¬ÏÈ˵Á¬½Ó·½Ã棺
Public Function DB_CnStr() As String
Return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "./FlashCard.mdb"
End Function
  ÉÏÃæµÄ´úÂë¾ÍÊÇÒ»¸ö¹«Óú¯Êý£¬ÒòΪ¶à´¦ÒªÓõ½£¬ÀÁµÃÿ´Î¶¼Ð´£¬Ö±½Óµ÷ÓÃϾÍOKÁË¡£Öм䲿·Ö¾ÍÊÇÒ»¸öÊý¾Ý¿âÁ¬½Ó×Ö´®£¬
Data Source=" & Application.StartupPath & "./FlashCard.mdb"ÕâÀï¾ÍÊÇÉèÖÃÄãµÄÊý¾Ý¿âµØÖ·£¬¾ßÌå´úÂë²»ÓÃÎÒ½âÊÍÁ˰ɣ¿
    Èç¹ûÓÐÃÜÂë¾ÍÐèÒªÔÙ¼ÓÒ»¸öÕ˺ÅÃÜÂëÁË.
     User ID=myUsername;Password=myPassword
Õâ¸ö×ÊÁÏÌ«¶àÁË£¬Ò²»ù±¾²î²»¶à£¬Ëæ±ã×¥×¥¾ÍÀ´¿©¡£
ÄÇÏÂÃæÊDz»ÊÇҪ˵˵ÈçºÎ²Ù×÷ÁË£¿¶Ô£¬²Ù×÷Êý¾Ý¿âÂÎ޷ǾÍÊDzéѯ£¬Ôö¼Ó£¬É¾³ý£¬ÐÞ¸ÄÕ⼸ÖÖ¡£´úÂë·½Ãæ»ù±¾Ò²²î²»¶àÁË£¬Ö»ÊÇSQLÉÏÒª»»Ãû×Ö¡£·Ï»°²»ËµÁË£¬Ö±½ÓÉÏ´úÂëºÃÁË¡£
‘ÕâÀï¾ÍÊÇ“²éѯ”²¿·Ö¿©£¬¾ßÌåÔõô²éÊÇдSQLµÄÎÊÌâÁË£¬ÏȲ»ÌÖÂÛ
’ÏÈÁ¬½Ó
DBConnection.ConnectionString = DB_CnStr()
DBConnection.Open()
'¿ªÊ¼²éѯ
Dim sql As New System.Text.StringBuilder
sql.Append(" SELECT * from WORDINFO")
sql.Append(" WHERE CLASS='").Append(Classstring).Append("'")
Dim cmd As New OleDb.OleDbCommand(sql.ToString, DBConnection)
Dim RS As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter(cmd)
DT = New DataTable
RS.Fill(DT)
DBConnection.Close()
'Óв鵽ÔòÏÔʾ³öÀ´
Rowcount = DT.Rows.Count
If Rowcount = 0 Then
MsgBox("No Reco


Ïà¹ØÎĵµ£º

VB ѧϰ¹ý³ÌºÍ·½·¨

      µÚÒ»´ÎÕýʽȥÉÏÃ×ÀÏʦµÄ¿Î£¬Õâ´ÎÊǺ®¼ÙÀ´ºóµÄµÚÒ»½Ú¿Î£¬ÄÚÈÝÖ÷ÒªÊǽ»Á÷һϺ®¼ÙµÄѧϰÇé¿ö¡£
      Ê×ÏÈÊÇÑÔÐÐÎÊÌ⣺ȥ»ú·¿ÉÏ¿Îʱ£¬´øÐØÅÆ¡¢±Ê¼Ç±¾¡¢±Ê¡¢¡¶Visual Basic ³ÌÐòÉè¼Æ¡·¡¢Ð¬Ìס¢ÑÛ¾µ£¬ÊÖ»úÄܲ»´ø¾Í²»´ø£»±ðÈË·¢ÑÔʱ£¬ÏÔʾÆ÷¹Øµô£¬ÃæÏò¶Ô·½ÒÔʾ×ð¾´¡£ ......

VB ³£Óà ¿ì½Ý¼ü Èȼü ³ÌÐòÔ±

´°ÌåÉèÖ㬿ؼþ²¼¾ÖʱÓÃ:
alt+v+x¿ÉÒÔ¿ìËÙÏÔʾ³ö¹¤¾ß¿ò
Alt+P+N ÒýÓÃ
ctrl+×óÓÒ¼üÍ·¿ÉÒÔÒÆ¶¯¿Ø¼þ  
shift+×óÓÒ¼üÍ·µ÷Õû¿Ø¼þ´óС
F7   Çл»µ½±à¼­´°¿Ú
Shift+f7 Çл»´úÂë´°¿Ú
¿ª·¢´úÂ룬µ÷ÊÔ´úÂë¶¼ÄÜÓõģº
Ctrl+C¸´ÖÆ
Ctrl+VÕ³Ìù
Ctrl+X¼ôÌù
Ctrl+F²éÕÒ
¿ª·¢´úÂëʱÓõÄ:
Tab ÏòÓÒÍÆ
Shi ......

vb³£ÓõÄÄÚ²¿º¯Êý£¨Ò»£©£ºÊýѧº¯Êý


Êýѧº¯Êý£ºÖ÷ÒªÓÃÀ´Íê³ÉÊýÖµ¼ÆËã¡£
£¨1£©abs£¨X£©£º¾ø¶ÔÖµº¯Êý£¬¼ÆËãXµÄ¾ø¶ÔÖµ£¬XΪһ¸öÊýÖµ±í´ïʽ¡£
£¨2£©sgn£¨X£©£º·ûºÅº¯Êý¡£¸Ãº¯ÊýµÄ¹¦ÄÜÊÇÅжÏXµÄ·ûºÅ¡£µ±X>0ʱ£¬º¯ÊýֵΪ1£»X<0ʱ£¬º¯ÊýֵΪ-1£»X=0ʱ£¬º¯ÊýֵΪ0.
£¨3£©exp£¨x£©£ºÃÝÔËË㺯Êý¡£·µ»ØeµÄX´ÎÃݵÄÖµ£¬·µ»ØÖµÎªË«¾«¶ÈÐÍÊýÖµ¡£
£¨4£©log£¨x£©£º× ......

¼¸ÄêǰдµÄÒ»¸ö access ·ÃÎÊÀà dbutils


using System;
using System.Data;
using System.Xml;
using System.Data.OleDb ;
using System.Collections;
namespace ePhoto.AccessDAL
{
/// <summary>
/// DBUtil ²Ù×÷AccessÊý¾Ý¿â
/// </summary>
public class DBUtil
{
private Hashtable parmCache = Hashtable.Synchronized(new ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ