在任意form類或模塊中都可以創(chuàng)建類，跟建立函數(shù)和過程一樣。
定安ssl適用于網(wǎng)站、小程序/APP、API接口等需要進行數(shù)據(jù)傳輸應用場景，ssl證書未來市場廣闊！成為成都創(chuàng)新互聯(lián)公司的ssl證書銷售渠道，可以享受市場價格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：13518219792（備注：SSL證書合作）期待與您的合作！
示例：
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
代碼已測試。
一、測試需要的INI文件。名稱為“setinfo.ini”，存放路徑為你解決方案里“Bin“文件夾的”Debug“文件夾里。
內(nèi)容：
[Location]
pnlTime.Location.X=787
pnlTime.Location.Y=0
[TopMost]
Top=True
二、操作INI文件的類。新建一個類，類中內(nèi)容為：
Public?Class?Class1
Public?Declare?Function?GetPrivateProfileString?Lib?"kernel32"?Alias?"GetPrivateProfileStringA"?_
(?_
ByVal?lpApplicationName?As?String,?_
ByVal?lpKeyName?As?String,?_
ByVal?lpDefault?As?String,?_
ByVal?lpReturnedString?As?String,?_
ByVal?nSize?As?Int32,?_
ByVal?lpFileName?As?String?_
)?As?Int32
End?Class
三、界面代碼：
Imports?System.IO?'for?path
Public?Class?Form1
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
getINI()
End?Sub
Private?Sub?getINI()
Dim?iniclass?As?New?Class1?'
Dim?myBf?As?String?'get?set_info?開辟存儲的內(nèi)存
myBf?=?New?String(CChar(""),?256)
Dim?myFN?As?String?'配置文件的文件路徑
myFN?=?Path.Combine(My.Application.Info.DirectoryPath,?"setinfo.ini")
Dim?myAN?As?String?'Application_NAME,也是Section名稱
myAN?=?Me.TextBox1.Text
Dim?myKN?As?String?'KEY_NAME,關鍵字名稱
myKN?=?Me.TextBox2.Text
Class1.GetPrivateProfileString(myAN,?myKN,?"",?myBf,?myBf.Length,?myFN)?'調(diào)用讀取INI文件的操作
TextBox3.Text?=?Microsoft.VisualBasic.Left(myBf,?InStr(myBf,?Chr(0))?-?1)?'截取有用部分,有必要
End?Sub
End?Class
四、測試截圖如下
VB一般指的是VB6.0是基于對象的,VB.NET是面向?qū)ο蟮?它們之間的語法接近，但差距也不小，學VB搞VB點虐 不亞于新學一門語言。
VB.NET生成的是托管代碼,必須運行于.NET框架之上.VB6則依賴于VB6運行時的支持。
WIN 7中仍然會提供VB6的支持,不過再到以后的版本就沒了。
如果你是第一次學,系統(tǒng)用XP，可以搞VB，要是用Win10等新系統(tǒng)，還是直接轉(zhuǎn)向VB.NET學習好了。
關于教程：
人民郵電的 Visual Basic 6.0 編程指南
清華大學的 Visual Basic 6.0 中文版傻瓜書
都是很老的書，可以找電子版，或者去圖書館借。
VB.NET程序設計 電子工業(yè)出版社 青島東合信息技術有限公司
《Visual Basic 2010入門經(jīng)典》有2個版本，一個是清華大學出版社的，一個是人民郵電出版社的，都不錯！
清華大學出版社出版的《VB.NET高級編程》，里面VB.NET的各種實現(xiàn)機制都進行了詳細的介紹，特別是類的實現(xiàn)，并且還有文件操作、數(shù)據(jù)庫實現(xiàn)等等，很詳細
重慶分公司
重慶分公司
