1. vb轉換股票數據的問題
大智慧股票數據
每個記錄40 byte
格式
long Date 0'相對開頭偏移量 byte
long Open=4
long High=8
long Low=12
long Close=16
long Volume=20
不是二進制方式，使用隨機方式 Random 讀取， 讀取以後 價格 /1000 就行了
定義類型
Private Type ddzh
Date As Long
Open As Long
High As Long
Low As Long
Close As Long
Volume As Long
End1 As Long
End2 As Long
End3 As Long
End4 As Long
End Type
Private Type dzh
Date As Long
Open As Single
High As Single
Low As Single
Close As Single
Volume As Long
End Type
用 Get 讀取記錄到 就可以了
ReDim ddzh(1 To 1) As ddzh
ReDim dzh(1 To 1) As dzh
Open "000001.day" For Random As #1 Len= Len(ddzh(1))
ReDim ddzh(1 To Lof(1)/Len(ddzh(1))) As ddzh
For i = 1 To ReadToTal
Get #1, i, ddzh(i)
Next i
Close #1
讀取以後轉換到
dzh里就可以了
大福星數據比較好用，分中圖都可以讀取
2. 求vb高手 做一個軟體實現股票自動買賣 我會通過另一個軟體計算買賣時間和價格，用vb實現買賣過程
這個說復雜也容易，說容易也復雜。
容易就在於演算法大家都知道，只要能實現查詢，然後根據設計需要進行交易就是了。
復雜就在於凡屬於金融領域的，不管是殺毒軟體還是防火牆，都是重點監控種類。尤其是證券公司和銀行，對於客戶沒有使用它們的終端而發生資金變動的話，那豈不是銀行或證券公司的漏洞了？
要獲得銀行的訪問許可權，你看現在的銀行主頁，一輸入密碼就需要載入什麼控制項，那就是保護措施啊。然後證券公司的訪問許可權。當然，如果你的錢全部轉到了證券公司，那隻要證券公司的許可權就可以了。
所以現在能夠實現自動買賣的軟體，都是證券公司自己寫的程序。你現在應該知道其原因了。證券公司可不會隨便讓你查詢它的檔案的。
3. VB如何讀取股票大盤數據，20秒更新一次，並動態的顯示到文本框中，請高手幫忙
這個要連接資料庫的。。
4. EXCEL如何用VBA自動獲取每個股票近幾天的漲幅
excel大量獲取數據是比較慢的 你這種得用vb寫dll多線程刷新數據才行 私聊
5. 用VB編股票期貨類軟體的圖形界面需要用哪些控制項
最好自己做
6. 哪位哥們用VB開發過股票軟體
採用vb中的瀏覽器控制項。然後自己弄個空間弄個網站，然後弄個空白頁，插入股票的代碼，然後在用瀏覽器控制項鏈接到上面就可以了。
7. 用VB 讀取通達信實時股票數據(現價，漲幅)
可以在http://stock.business.sohu.com/p/pl.php
用VB的 WebBrowser1_DownloadComplete 做。
引用Internet Controls
8. 用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(',');
}
9. VB 怎樣調出股票板塊信息
可以利用股票網頁信息
10. 一半股票軟體那種打出來600xxx然後下面就可以顯示一個股票名稱和代碼的功能能不能在VB控制項實習
這個很簡單的，你首先要建立相應的資料庫，資料庫存有有 中國石化 中國電信 等等信息。然後當你在文本框（假設是TEXT1）中輸入字元的時候取信息：
先引用 DAO ，或者ADO 數據引擎。我這里以DAO為例。
Private Sub Text1_Change()
Dim mMDB As Database
Dim mREC As Recordset
Set mMDB = Workspaces(0).OpenDatabase("資料庫路徑")
Set mREC = mMDB.OpenRecordset("select * from 數據表 where 欄位名稱 like '%" & Text1.Text & "%'")
If mREC.EOF = True Or mREC.BOF = True Then
'如果沒有找到就不處理
Else
'如果找到就顯示吧,至於怎麼顯示，顯示多少，就依程序需要而定了
text2.Text = mREC.Fields("欄位名稱")
'.....其他代碼
End If
End Sub
如果不想使用資料庫，就通過讀取TXT文件或者其他格式文件也可以了。
如果取的信息量小，你甚至可以直接寫在程序里，總之，方法很多