Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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


Ïà¹ØÎĵµ£º

VC++ÓëVBÊý¾ÝÀàÐͶÔÓ¦¹Øϵ


 VC++
ÓëVB
Êý¾ÝÀàÐͶÔÓ¦¹Øϵ
  ÔÚ×öVCÓëvb³ÌÐò¼ä»¥Ïàµ÷Óã¬ÐèҪעÒâÁ½ÖÖÓïÑÔ²»Í¬±àÒëÆ÷¶ÔÊý¾ÝÀàÐ͵Ķ¨ÒåÇø±ð£¬´ËʱÁ½ÕßÊý¾ÝÀàÐ͵ĶÔÓ¦¹Øϵ¾ÍÏÔµÃÊ®·ÖµÄÖØÒª£¬¶ÔÓ¦¹ØϵÒÔ¼°ÉùÃ÷·½Ê½ÈçÏÂËùʾ¡£
VC++

VB

short
Integer
int
Long
long
Long
UNIT
Long
ULONG
Long
WORD
DWORDLon ......

vb³£ÓÃÄÚ²¿º¯Êý£¨ËÄ£©£ºËæ»úÊýº¯Êý


rndº¯Êý·µ»Ø»òÕß˵²úÉúÒ»¸öСÓÚ1µ«´óÓÚ»òµÈÓÚ0µÄsingleÀàÐ͵ÄËæ»úÊý¡£
²úÉúËæ»úÊý֮ǰÐèÒªÒ»¸öÖÖ×Ó¡£
·²»Í¬µÄÖÖ×Ó£¬¿ÉʹËæ»úÊýÉú³ÉÆ÷Éú³É²»Í¬µÄËæ»úÊý£»
·ÔÚÒ»¸öÖÖ×ÓÏ£¬Éú³ÉµÄËæ»úÊýÏàͬ¡£
Ëæ»úÊýÉú³ÉÆ÷µÄÓï¾äΪrandomize¡£¸ñʽΪ£ºrandomize[x]¡£
·µ±x>0ʱ£¬Ê¹ÓÃÇ°Ò»´Îµ÷ÓÃrndº¯Êý²úÉúµÄË ......

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

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

¼¸ÄêǰдµÄÒ»¸ö 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ºÅ