在任意form類或模塊中都可以創(chuàng)建類,跟建立函數(shù)和過程一樣。
創(chuàng)新互聯(lián)是一家專業(yè)提供通許企業(yè)網站建設,專注與成都網站建設、成都網站制作、HTML5、小程序制作等業(yè)務。10年已為通許眾多企業(yè)、政府機構等服務。創(chuàng)新互聯(lián)專業(yè)網站建設公司優(yōu)惠進行中。
示例:
public class form1
‘創(chuàng)建一個屬于form的子類,名稱為【類名】。
public class 類名
’定義類成員text
public text as string
end class
‘定義一個【類名】類的公共變量。
dim 類名1 as 類名
’定義一個過程,使用【類名】類的text成員
public sub 過程
‘實例化【類名1】
類名1=new 類名
類名1.text=“賦值”
’定義一個【新類】類的私用變量,并實例化。
dim 新類1 as new 新類
新類1.name=“一個字符串”
新類1.age=12
end sub
end class
‘’‘創(chuàng)建一個與form同級的類,名稱為【新類】
public class 新類
public sub new()
end sub
public name as string
public age as integer
end class
在模塊中使用:
public class module1
dim a as new form1.類名
end module
AutoCAD會了,要學會使用插件。如果自己學會開發(fā)的話,還是不錯的。教程的文件有些大,看附件下載。
首先在項目的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
'創(chuàng)建空的access數(shù)據庫文件--數(shù)據庫文件.mdb,密碼為123
Dim?Mycat?As?Catalog?=?New?Catalog()
Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet?OLEDB:Engine?Type=5;Data?Source=?數(shù)據庫文件.mdb;Jet?OLEDB:Database?Password=123")
'以下代碼創(chuàng)建一個名為“實驗數(shù)據表”
Dim?MyTable?As?ADOX.Table?=?New?ADOX.Table?????????'定義新表
MyTable.Name?=?"實驗數(shù)據表"????'表命名
'給表“實驗數(shù)據表”?創(chuàng)建一個字符串字段,字段名“姓名”
MyTable.Columns.Append("姓名",?,?ADOX.DataTypeEnum.adWChar)
'給表“實驗數(shù)據表”?創(chuàng)建一個整數(shù)字段,字段名“學號”
MyTable.Columns.Append("學號",?ADOX.DataTypeEnum.adInteger)????'追加一個數(shù)字型字段
'給字段“學號”創(chuàng)建一個主鍵“PimaryKey_Field”????????
MyTable.Keys.Append("學號",?ADOX.KeyTypeEnum.adKeyPrimary,?"學號")
Mycat.Tables.Append(MyTable)?'把所有的新字段追加到表
MyTable?=?Nothing
Mycat?=?Nothing
End?Sub
End?Class
建議到書店去看看,大一點的書店,這樣的書挺多的,網上的大多都不太好,也不完整,最好找那種有開發(fā)步驟的,而不是凈粘一堆代碼的,這種東西有個大體框架,知道怎么個過程就夠了,具體開發(fā)細節(jié)一步步摸索,教程里的東西大多都運行不了,再說一步步照著做也沒什么長進