vb通過控制項獲取股票資料庫

❶ 在VB怎麼查詢資料庫中的數據啊！

1.一個簡單的查詢的例子：
'*定義一個連接
Dim Conn As ADODB.Connection
'*定義一個記錄集
Dim mrc As ADODB.Recordset
'*分別實例化
Set Conn = New ADODB.Connection
set mrc =New ADODB.Recordset
'*定義一個連舉碼接字元串
dim ConnectString as string
ConnectString="provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\data\資料庫名.mdb;jet oledb:database password=資料庫密碼"
'*打開連接
Conn1.Open ConnectString
'*定義游標位置
Conn1.CursorLocation = adUseClient
'*查詢記錄集(從student表中找出名子為"張三"的記錄)
mrc.open "select * from student where name='張三掘答派'",Conn, adOpenKeyset, adLockOptimistic

'*現在你已經得到了你想要查詢的記錄集了，那就是判賀mrc
'*你可以把此記錄集與DataGrid榜定，用datagrid顯示你查詢的記錄
set me.datagrid.datasource=mrc

❷ 在VB.NET中如何使用新浪股票數據介面

基本沒有，你得和人家有合作關系

❸ vb中使用表格控制項瀏覽資料庫中的數據

1、用一個ADODC1控制項連盯禪讓接你的資料庫，在窗口中放一個
表格控制項
datagrid1
2、在一事件中（比如按凱局鈕單襲握擊事件、窗口載入事件）設置以下語句
adodc1.recordsource="select
……"(就是你的查詢語句）
adodc1.refresh
set
datagrid1.datasource=adodc1
在最後面加句結束語句:end
sub

❹ 用VB 讀取通達信實時股票數據(現價，漲幅)

可以在http://stock.business.sohu.com/p/pl.php
用VB的 WebBrowser1_DownloadComplete 做。
引用Internet Controls

❺ 用VB如何直接獲取股票實時數據

可以通過調用ChinaStockWebService的服務來實現獲取股票的實時數據，代碼如下：

publicstring[]getStockInfo(stringstockcode)
{

//stringurl="http://hq.sinajs.cn/list="+stockcode;
//stockcode某隻股票的代碼
stringurl="http://hq.sinajs.cn/list=sh600683";
WebClientclient=newWebClient();
client.Headers.Add("Content-Type","text/html;charset=gb2312");
Streamdata=client.OpenRead(url);
StreamReaderreader=newStreamReader(data,Encoding.GetEncoding("gb2312"));
strings=reader.ReadToEnd();
reader.Close();
data.Close();
returns.Split(',');
}

❻ VB怎樣讀取資料庫並顯示出來

VB讀取資料庫並顯示出來的方法可參考下面用控制項的實現方法：

1. ACCESS資料庫，用VB6里的Data控制項，選枯察中它，設置屬性：
   

2. DatabaseName屬性：連接到資料庫文件

3. RecordSource屬性：連接數據表（可以用Select語句返回記錄集）

4. 然後使用辯此它的：data1.Recordset.Fields(「欄位名」)，就可以返回獲沒灶茄得你說的內容了。

❼ 在VB中的List控制項里怎麼讀取資料庫中的信息，並將其顯示在這個List控制項上

1. 鏈接數據櫻謹孫庫。查詢你需要顯示的內容。
   

2. for 循環 使用list.AddItem "脊鏈晌改添加的內容" 講需要顯示的多條信息顯示出來。就完成了。
   

❽ VB6.0中怎樣使用data控制項實現資料庫查找功能

1、使用data控制項的FindFirst方法可以實現資料庫記錄的查找。

2、工具：vb6。

3、具體實現方法：

a)在窗體上添加data1、dbgrid1、text1、command1、label1

b)在dbgrid1的DataSource屬性里選擇data1

c)實現代碼如下：

PrivateSubCommand1_Click()
'查找定位記錄
Data1.Recordset.FindFirst"CategoryID="&Text1.Text

DBGrid1.DataSource
EndSub

PrivateSubForm_Load()
Data1.Connect="Access2000;"'設置資料庫類型
Data1.DatabaseName="C:db1.MDB"'連接資料庫耐御
Data1.RecordSource="Categories"'資料庫中的表
Data1.Refresh'打開資料庫

EndSub

4、咐畝讓注意：資料庫可以使用vb6文件夾內的衡局NWIND.MDB

❾ vb如何獲取資料庫的數據，並修改

VB可通過結構化查詢語言(SQL)訪問資料庫。
下面幫你寫一個簡單的過程,將學號以參數傳給該過程:
Private Sub editmark(num as Integer)
'聲明一個記錄集
Dim rs As New ADODB.Recordset
'定義一態並個SQL查詢串
SQLStr = "select * from student where id=" & num
'執行查詢
rs.Open SQLStr, Conn, 3, 2
If Not rs.EOF Then
rs("mark")=rs("mark")-10
end if
'更新資料庫
rs.update
End Sub
--------------------------------------------------------------
補充:
1、對於Conn提問者肯定明咐灶白，因為提問者已經說明連接部分可以忽略；
2、對於rs("mark")=rs("mark")-10 是可行的，因為通過過程參數的傳遞記錄已經定位在某條記錄上，還考慮什麼轉移；
3、我們回答提問者的問題應盡量簡單可行，說明問題即帆簡跡可，無需長篇大論讓提問者一頭霧水，長篇大論就是「敬業」嗎？
--------------------------------------------------------------
最後補充：
沒有關系，我們是在討論問題嘛！

其實,對於「vb操作資料庫」我相信不是我們在這里舉一個簡單的例子能說透的。我只是想通過這個簡單的例子（越簡單越易讓提問者搞懂），告訴提問者用SQL可以訪問並操作資料庫，至於具體許多細節需要提問者熟悉一下SQL和VB提供的ADO，我想這也是提問者的真實意圖。
另外，關於rs("mark")=rs("mark")-10在這個例子中肯定是可行的,因為學生的id肯定是唯一的（應該是數據表student的主鍵）,不會有重復的id。