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文件或者其他格式文件也可以了。
如果取的信息量小，你甚至可以直接写在程序里，总之，方法很多