if object_id('primarytbl') is not null drop table primarytblgo --建主表create table primarytbl( ID int primary key, --主鍵 aa int, bb int, cc int)go if object_id('foreigntbl') is not null drop table foreigntblgo --建外表create table foreigntbl( ID int primary key, --主鍵 aa int foreign key references primarytbl(ID) --建立外鍵 on update cascade, --更新級聯 dd int, ee int)go --插入主表數據insert into primarytblselect 1, 1, 2, 3 union allselect 2, 2, 3, 4 union allselect 3, 3, 4, 5 union allselect 4, 4, 5, 6 union allselect 5, 5, 6, 7 union allselect 6, 6, 7, 8go --插入外表數據insert into foreigntblselect 1, 1, 2, 2 union allselect 2, 1, 3, 3 union allselect 3, 2, 4, 4 union allselect 4, 2, 4, 4 union allselect 5, 2, 5, 5 union allselect 6, 3, 6, 6 union allselect 7, 4, 7, 7go --顯示主外表信息select *from primarytbl select *from foreigntblgo--primarytbl/*ID aa bb cc----------- ----------- ----------- -----------1 1 2 32 2 3 43 3 4 54 4 5 65 5 6 76 6 7 8--foreigntblID aa dd ee----------- ----------- ----------- -----------1 1 2 22 1 3 33 2 4 44 2 4 45 2 5 56 3 6 67 4 7 7*/ --更新主表主鍵update primarytblset ID = 8where ID =1go --結果select *from primarytbl select *from foreigntblgo /*--primarytblID aa bb cc----------- ----------- ----------- -----------2 2 3 43 3 4 54 4 5 65 5 6 76 6 7 88 1 2 3--foreigntblID aa dd ee----------- ----------- ----------- -----------1 8 2 22 8 3 33 2 4 44 2 4 45 2 5 56 3 6 67 4 7 7*/ drop table foreigntbldrop table primarytbl

站在用戶的角度思考問題,與客戶深入溝通,找到旺蒼網站設計與旺蒼網站推廣的解決方案,憑借多年的經驗,讓設計與互聯網技術結合,創造個性化、用戶體驗好的作品,建站類型包括:成都網站制作、網站設計、外貿網站建設、企業官網、英文網站、手機端網站、網站推廣、空間域名、網頁空間、企業郵箱。業務覆蓋旺蒼地區。
dt.select(條件)
返回的類型是
DataRow []
是行集合 不是 表
所謂主鍵,指的就是主關鍵字。在一個表中只能有唯一的一個主關鍵字。
當你覺得需要定義多個主鍵時,多半是你對該表及其周邊關系的理解有誤。
首先在項目的VB.NET界面,使用菜單【項目】--【添加引用】--【COM】
選擇 ?Microsoft ADO Ext. 2.x for DDL and Security
然后單擊【確定】,完成引用。
完整代碼如下:
Imports?ADOX
Public?Class?Form1
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
'創建空的access數據庫文件--數據庫文件.mdb,密碼為123
Dim?Mycat?As?Catalog?=?New?Catalog()
Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet?OLEDB:Engine?Type=5;Data?Source=?數據庫文件.mdb;Jet?OLEDB:Database?Password=123")
'以下代碼創建一個名為“實驗數據表”
Dim?MyTable?As?ADOX.Table?=?New?ADOX.Table?????????'定義新表
MyTable.Name?=?"實驗數據表"????'表命名
'給表“實驗數據表”?創建一個字符串字段,字段名“姓名”
MyTable.Columns.Append("姓名",?,?ADOX.DataTypeEnum.adWChar)
'給表“實驗數據表”?創建一個整數字段,字段名“學號”
MyTable.Columns.Append("學號",?ADOX.DataTypeEnum.adInteger)????'追加一個數字型字段
'給字段“學號”創建一個主鍵“PimaryKey_Field”????????
MyTable.Keys.Append("學號",?ADOX.KeyTypeEnum.adKeyPrimary,?"學號")
Mycat.Tables.Append(MyTable)?'把所有的新字段追加到表
MyTable?=?Nothing
Mycat?=?Nothing
End?Sub
End?Class
當前題目:vb.net定義主鍵 vbs實現自動按鍵
當前URL:http://www.yijiale78.com/article44/hhcghe.html
成都網站建設公司_創新互聯,為您提供營銷型網站建設、網站導航、、用戶體驗、軟件開發、域名注冊
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯