‘壹’ 俺想用vb读取网页"http://data.eastmoney.com/zjlx/detail.html"表格里的数据，并保存为文本文件，谢谢！
http中文:/中文/nufm.dfcfw.com/EM_Finance2014NumericApplication/JS.aspx/JS.aspx?type=ct&st=(BalFlowMain)&sr=-1&p=3&ps=50&js=var%20iQRthzrg={pages:(pc),date:"2014-10-22",data:[(x)]}&token=&cmd=C._AB&sty=DCFFITA&rt=47426289帮你抓包了看看，请求数据提这个地址，你要把网址中“中文”二字去掉，然后在浏览器中打开就可以看到数据了，可以看到返回的是json字符串，我们注意到网址中有“&p=3”，此时就是第三页的数据，可以遍历这个这个网址就能取得所有页数据，&p=4,&p=5,&p=6... ...
你可能很想知道我是如何知道是这个网址，
就是利用IE浏览器一个抓包插件，httpWatch
网络搜下其，安装好再看看其相关教程，很容易学会的
‘贰’ 用VB 读取通达信实时股票数据(现价，涨幅)
可以在http://stock.business.sohu.com/p/pl.php
用VB的 WebBrowser1_DownloadComplete 做。
引用Internet Controls
‘叁’ 一半股票软件那种打出来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文件或者其他格式文件也可以了。
如果取的信息量小，你甚至可以直接写在程序里，总之，方法很多
‘肆’ VB.net 如果读取txt数据(或十进制dat数据)
vb.net虽也有input语句，但一次只能读取到一个变量中，可以用TextFieldParser类代替，但似乎没以前的方便。不过比以前的更灵活。写入文件Write还是可以用，在Microsoft.VisualBasic.FileIO中。
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
DimfileNameAsString="E:电子阅读股票 able2.csv"
UsingRecrodsAsNewMicrosoft.VisualBasic.FileIO.TextFieldParser(fileName)'建立TextFieldParser对象
'MyReader.TextFieldType=FieldType.Delimited
Recrods.SetDelimiters(",")'把字段分隔符设置为","
DimcurRow()AsString
DoUntilRecrods.EndOfData
curRow=Recrods.ReadFields()'读取记录行，返回字符串数组，所以不同字段类型需要自己转换。
Debug.Print(Join(curRow,vbTab))
Loop
EndUsing
EndSub
‘伍’ EXCEL如何用VBA自动获取每个股票近几天的涨幅
excel大量获取数据是比较慢的 你这种得用vb写dll多线程刷新数据才行 私聊
‘陆’ 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里就可以了
大福星数据比较好用，分中图都可以读取
‘柒’ 用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中我如何做到保存数据和读取数据呢求大神帮忙 下面详细介绍必好评，在线等
首先你要从数据库提取出你要放在TREEVIEW里的字段，当然是分类提取，然后根据提取到的字段分别绑定，中间还存在自我判断等，所需要的过程相对比较复杂，需进行多次运算，飞人建议分开来写，没必要一次就全部绑定到treeview否则会加长运算时间，使用感觉会差一些，至于保存成指定格式，那就看你自己的了，因为保存成什么样的后缀文件可以自己规定，导出时你所使用的是什么控件根据控件不同，导出的方式也略有不同
提取treeview所需数据时需要分各个节点来提取，这样可以加快提取精准度，同事会让使用者感觉速度快
‘拾’ 在VB.NET中如何使用新浪股票数据接口
基本没有，你得和人家有合作关系