Ⅰ vb如何讀取資料庫一行數據
'讀取方法：
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.ListBox1.Items.Clear()
Dim StrRed As StreamReader = New StreamReader("D:111.txt", System.Text.Encoding.Default)
While Not StrRed.EndOfStream
Me.ListBox1.Items.Add(StrRed.ReadLine())
End While
StrRed.Dispose()
End Sub
End Class
Ⅱ 想用VB編一個程序讀取sql資料庫中的內容
不同的計算機安裝SQL的連接是不同的.
關於連接總結如下:
ADODB編碼連接字的實例
VB中，關於SQL資料庫的連接是比較復雜的，但也有一個可以參考的學習思路，方法如下。
1、建立資料庫鏈接
在工具條中，有一個「數據視圖窗口」的工具，用它可以建立各種資料庫的鏈接。建立鏈接的過程：
點擊「數據視圖窗口」，出現「數據視圖」窗體，點擊選中「數據鏈接」，按右鍵，點擊「添加數據鏈接」，出現「數據鏈接屬性」窗口，有四個菜單：「提供程序」、「連接」、「高級」、「所有」。
選中「提供程序」菜單，這里有許多用於鏈接的驅動程序，選中「Microsoft OLE DB Provider for SQL Server」，點擊「下一步」。「Microsoft OLE DB Provider for SQL Server」是真正的SQL資料庫連接字用的驅動程序。
當選中「Microsoft OLE DB Provider for SQL Server」，點擊「下一步」，則自動進入「連接」窗體界面。這個「連接」窗體界面的內容，隨前面選取的驅動程序而定。
因為前面選擇的是「Microsoft OLE DB Provider for SQL Server」，所以，「連接」窗體的主要內容就是直接訪問SQL資料庫的相關內容的設置，如下：
在「…….伺服器名稱」一欄中怎麼選擇呢?如SQL資料庫伺服器安裝時是選擇當地默認的實例，即以本地計算機名代替的伺服器，則此處應填寫的內容是:(local)，或者是：本地的計算機名。估計，非本地的則可填寫：伺服器的IP地址或伺服器名稱。
在「輸入登錄伺服器的信息」一欄中怎麼選擇呢?當選擇「使用指定的用戶名和密碼」一項時，用戶名與密碼是在SQL伺服器安裝時選定的內容（值）。若不用密碼及用戶名登入，則連接字的密碼應代之為：Integrate Security=SSPI，表示用「Windows NT 集成安全設置」之意，SQL2005是用這一項的。但實際的ADODB的連接字是不能用這個NT打開的。
在「伺服器上選擇資料庫」一欄中怎麼選擇呢?當前面兩項內容選擇正確後，此處的內容是存在可選的，選中即可。
最後「測試連接」，顯示成功。則在「數據視圖」窗體的「數據鏈接」中將出現「Datelink1」，表示建立了以「Datelink1」為名的第1個資料庫鏈接。當然也可以建立多個，名字將分別為「Datelink2」、「Datelink3」……
2、從已建立的資料庫鏈接的屬性中找連接字。
當選中「數據視圖」窗體的「數據鏈接」，出現「Datelink1」，並選中「Datelink1」，按右鍵出現彈出菜單，選中「屬性」，點擊，並可看見這個鏈接所用到的名字「Name」，「Name」對應的值，就是連接字的主要內容。只是缺少「Password= 」與「 .ConnectionTimeout= 」，因此只要把這兩向補齊，就是一個完整可用的ADODB的連接字，而且也適用於ADODC控制項的字連接，即ConnectionString，但不需要雙引號「」而已。
注意：在前面「數據鏈接屬性」窗口的四個菜單「提供程序」、「連接」、「高級」、「所有」中，前面只重點介紹了「提供程序」與「連接」兩項，實際上，「高級」就有ConnectionTimeout屬性的選擇項。而「提供程序」、「連接」、「高級」三項的選擇結果，都在「所有」項中集中顯示出來，而且「所有」項中，還有前三項不具有的其它的內容，因此，要注意察看與應用。
Command1_Click()
Me.Caption = "NAME"
Me.Cls
Dim con As ADODB.Connection (註：ADODC控制項用的申明，不用ADODB，也不用Adodc。)
Dim rs As New ADODB.Recordset
Set con = New ADODB.Connection
con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=SQL資料庫名;Data Sure=(local);Password=密碼值（註：無時不選此項）;Use Procere for preplare=1;Auto Translate=True;Packet Size = 4096;Workstation ID=（local）（註：或是區域網的機器名）;Use Encryption for Date=False;Tag With column collation when Possible=False"
con.Open
rs.Open "Select * from SQL資料庫表或視圖名 ", con
Me.AutoRedraw = True
rs.MoveFirst
Dim ptr As Integer
For ptr = 0 To 20
Print rs.Fields(ptr).Name, 注:Name表示是表格的列名。
Next ptr
While Not rs.EOF()
Print
For ptr = 0 To 20
Print rs.Fields(ptr).Value, 注:Value表示是表格的數值。
Next ptr
rs.MoveNext
Wend
End Sub
用ADODC方法更簡單:
在窗口中建立:Command1,CAdodc1及DataDrid1,設置好CAdodc1的連接屬性,見前所述.
Command1_Click()
Me.Caption = "NAME"
Me.Cls
Set DataDrid1=Adodc1
End Sub
Ⅲ VB如何從資料庫讀取指定數據
vb綁定數據方法：
通過datasource屬性綁定
比如使用資料庫控制項
datasource
控制項會出現一個下拉框
選擇需要綁定的數據控制項，然後設置datamember綁定表，datafield綁定具體欄位；也可以使用代碼綁定
例如
set
list1.datasource=adodc1.recordset
list1.refresh'刷新
Ⅳ VB中利用timer事件每隔一定時間連接SQL資料庫，實時讀取裡面的數據。為什麼另外的timer事件會受到影響。
二個不同的時間設計必須使用二個不同的Timer控制項，例如對Picture2的時間使用Timer1控制項，連接SQL資料庫使用Timer2控制項。
Ⅳ VB怎樣讀取資料庫並顯示出來
VB讀取資料庫並顯示出來的方法可參考下面用控制項的實現方法：
ACCESS資料庫，用VB6里的Data控制項，選中它，設置屬性：
DatabaseName屬性：連接到資料庫文件
RecordSource屬性：連接數據表（可以用Select語句返回記錄集）
然後使用它的：data1.Recordset.Fields(「欄位名」)，就可以返回獲得你說的內容了。
Ⅵ VB6.0如何每隔一秒讀取一次excel的數據
PrivateSubForm_Load()
Timer1.Interval=1000'1000毫秒（即1秒）執行一次
Timer1.Enabled=True
EndSub
PrivateSubTimer1_Timer()
'每隔一秒要執行的操作代碼寫在這
EndSub
Ⅶ vb中我如何做到保存數據和讀取數據呢求大神幫忙 下面詳細介紹必好評，在線等
首先你要從資料庫提取出你要放在TREEVIEW里的欄位，當然是分類提取，然後根據提取到的欄位分別綁定，中間還存在自我判斷等，所需要的過程相對比較復雜，需進行多次運算，飛人建議分開來寫，沒必要一次就全部綁定到treeview否則會加長運算時間，使用感覺會差一些，至於保存成指定格式，那就看你自己的了，因為保存成什麼樣的後綴文件可以自己規定，導出時你所使用的是什麼控制項根據控制項不同，導出的方式也略有不同
提取treeview所需數據時需要分各個節點來提取，這樣可以加快提取精準度，同事會讓使用者感覺速度快
Ⅷ vb如何定時讀取txt每行的數據
'添加一個text 一個timerDim a(100)
Dim var1 As String
Dim i As Integer
Dim ii As Integer
Private Sub Form_Load()
Timer1.Interval = 2000
Open "c:\1.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, var1
a(i) = var1
i = i + 1
LoopEnd SubPrivate Sub Timer1_Timer()
Text1.Text = a(ii) & ii
ii = ii + 1
If ii >= i Then ii = 0
End Sub
Ⅸ VB通過ADO訪問資料庫，如何定時查詢
mycnn對象 不需要每次都打開又關閉的~直接設置全局變數 程序啟動時連接資料庫
需要查詢時直接操作myrst對象 能節約點時間
Ⅹ VB讀取資料庫方法
可以用ADODB，先定義
Dim cnn
As
New
ADODB.Connection
Dim rs
As
New
ADODB.Recordset
這兩個cnn用來連接資料庫rs用來讀取資料庫中的值，然後用循環遍歷rs將值ADD到listview裡面
修改和保存可以做成同一個按鈕保存就是遍歷listview將數據UPDATE到資料庫裡面就行！