dim?s1?as?string
創(chuàng)新互聯(lián)網(wǎng)站建設(shè)公司是一家服務(wù)多年做網(wǎng)站建設(shè)策劃設(shè)計(jì)制作的公司,為廣大用戶提供了成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作,成都網(wǎng)站設(shè)計(jì),1元廣告,成都做網(wǎng)站選創(chuàng)新互聯(lián),貼合企業(yè)需求,高性價(jià)比,滿足客戶不同層次的需求一站式服務(wù)歡迎致電。
dim?data?as?string
s="Tell?me?the?history"
data=SendToIE(s)
我用的是火狐瀏覽器,點(diǎn)擊“工具-選項(xiàng)-隱私-歷史:Firefox將會(huì):使用自定義歷史記錄(選中)——”記錄查詢和表單歷史“不選中即可
截至今天2016/12/02,VB.net最新版本是VB 14,
對(duì)應(yīng)的IDE為Visual Studio 2015
從VB 7開(kāi)始,每次.net平臺(tái)更新,VB版本也會(huì)不斷更新。
VB歷史版本如下(.net平臺(tái))
沒(méi)有 VB13?
VB12 對(duì)應(yīng) VS2013
VB11 對(duì)應(yīng) VS2012
VB10 對(duì)應(yīng) VS2010
VB9 對(duì)應(yīng) VS2008
VB8 對(duì)應(yīng) VS2005
VB7 對(duì)應(yīng) VS2003
VB6 是經(jīng)典版本,它不是 .net平臺(tái)的
VB.NET
VB.net是微軟最新平臺(tái)技術(shù),是.net framework SDK的一種語(yǔ)言。VB.net和VC#.net在功能上沒(méi)有區(qū)別。編譯以后生成的可執(zhí)行文件被稱為Assembly,即程序集。
VB.net的版本號(hào)是Visual Basic 7.0,它的運(yùn)行是建立在CLR(Common Language Runtime)和MSIL(Microsoft Intermediate Language)虛擬器上的。其實(shí),它的機(jī)制和Java差不多。
VB.net的語(yǔ)言特點(diǎn)有下:
1. 代碼托管。被托管的代碼享受.net framework提供的安全保障和垃圾回收機(jī)制,但是這也同時(shí)表明,你的程序被框在Framework里面了。API變得不太方便。
2. 強(qiáng)大的面向?qū)ο筇匦浴,F(xiàn)在VB7已經(jīng)是一個(gè)完全的面向?qū)ο蟪绦?。舉個(gè)例子:
VB6:
Form2.Show
VB.net:
Dim frm As New Form2()
frm.Show
現(xiàn)在VB7已經(jīng)支持類的各種特性:繼承,函數(shù)的覆蓋,重載,虛擬,隱藏……
3. 功能強(qiáng)大,程序界面更標(biāo)準(zhǔn)。
4. 程序代碼結(jié)構(gòu)化更強(qiáng),開(kāi)發(fā)環(huán)境舒適體貼。
一般,我都不喜歡做這樣報(bào)上一條下一條,太專業(yè)的數(shù)據(jù)庫(kù)操作不適合終端用戶。
如果必須要做,你可以這樣:按排序規(guī)則,取到健列表。保存到list中,上下條,只是改變一索引而已。
Imports System.Data.OleDb
Class BindNavigate
Dim cnn As OleDb.OleDbConnection '打開(kāi)連接略
Dim lst As New List(Of Integer)
Sub New()
lst = New List(Of Integer)
index = -1
Using da As New OleDbDataAdapter("select id from mytable order by abc,def", cnn), tb As New DataTable
da.Fill(tb)
For Each row As DataRow In tb.Rows
Dim n As Integer = row(0)
lst.Add(n)
Next
If tb.Rows.Count 0 Then CurrentIndex = 0
End Using
End Sub
Dim index As Integer Event CurrentIndexChanged()
Property CurrentIndex As Integer
Get
Return index
End Get
Set(ByVal value As Integer)
Dim b As Boolean = value index
index = value
If b Then RaiseEvent CurrentIndexChanged()
End Set
End Property
'當(dāng)前的鍵值
ReadOnly Property CurrentValue As Integer
Get
Return lst(index)
End Get
End Property
Sub MoveFirst()
CurrentIndex = 0
End Sub
Sub MovePrevious()
CurrentIndex -= 1
End Sub
Sub MoveNext()
CurrentIndex += 1
End Sub
Sub MoveLast()
CurrentIndex = lst.Count - 1
End Sub
ReadOnly Property BOF
Get
Return CurrentIndex = 0
End Get
End Property
ReadOnly Property EOF
Get
Return CurrentIndex = lst.Count - 1
End Get
End Property
Private Sub Text_CurrentIndexChanged() Handles Me.CurrentIndexChanged
'綁定過(guò)程
End Sub
End Class
本文標(biāo)題:vb.net歷史列表的簡(jiǎn)單介紹
URL網(wǎng)址:http://chinadenli.net/article46/hgceeg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供用戶體驗(yàn)、定制網(wǎng)站、營(yíng)銷型網(wǎng)站建設(shè)、移動(dòng)網(wǎng)站建設(shè)、面包屑導(dǎo)航、Google
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)