vb接收股票数据

‘壹’ 怎样用 C++程序获得股票实时行情

这里是VB..不是C++..你搞错了..

我曾经在VBGOOD论坛上面看到过有人用C++写的一个关于在线查看股票行情的软件,这方面应该实现起来并不难...关键是数据的访问,也就是说谁提供数据给你的一个数据源...其它应该不难...

‘贰’ 用VB语言能否编出股票期货类软件

可以，现在还有很多公司和企业、政府用的软件就是用VB编写的。这个也不例外，只不过现在出现的编程语言越来越多，实现某个软件可供选择比较多而已。

‘叁’ 请问股票当中的MID是什么意思

股票当中的MID是MID函数。

Mid是Visual Basic和Microsoft Excel中的一个字符串函数，作用是从一个字符串中截取出指定数量的字符。这个函数的3个参数各在VB和Excel中互相等价，但VB中的Length参数可以省略，而Excel中num_chars参数不可省略。

当Start（start_num）参数小于1时，函数返回一个错误；当Start参数值大于String（text）参数长度时，返回一空字符串；若从Start参数起截取长度超出字符串末尾，或Length参数被省略，则返回Start参数位置到字符串结尾的所有字符。

(3)vb接收股票数据扩展阅读：

普通股股东按其所持有股份比例享有以下基本权利四点：

1、公司决策参与权。普通股股东有权参与股东大会，并有建议权、表决权和选举权，也可以委托他人代表其行使其股东权利。

2、利润分配权。普通股股东有权从公司利润分配中得到股息。普通股的股息是不固定的，由公司赢利状况及其分配政策决定。普通股股东必须在优先股股东取得固定股息之后才有权享受股息分配权。

3、优先认股权。如果公司需要扩张而增发普通股股票时，现有普通股股东有权按其持股比例，以低于市价的某一特定价格优先购买一定数量的新发行股票，从而保持其对企业所有权的原有比例。

4、剩余资产分配权。当公司破产或清算时，若公司的资产在偿还欠债后还有剩余，其剩余部分按先优先股股东、后普通股股东的顺序进行分配。

参考资料来源：网络-MID函数

‘肆’ vb 获取股票行情报价

这是页面内容采集问题,没啥难度

网上代码太多了(你可以搜 VB 抓取网页),以实现基本功能(把页面 http://www....)的内容抓过来
有了内容,你需要做的仅是截取部分有用内容后在使用正则表达式筛选即可

比如你抓过来的内容是截取部分有用内容后放到了字符串 str
那么使用下面的函数即可
' 正则求值

Public Function Value(ByVal str As String, ByVal RegexEx As String, ByVal SN As Integer) As String
Try
Dim regex As New Regex(RegexEx)
Dim m As MatchCollection = regex.Matches(str)
Try
Return m(SN).ToString()
Catch
Return ""
End Try
Catch
Return ""
End Try

End Function

你的text1可能是

需要过滤下

dim a as string = Value(str,"...",0).replace("<a>","")
text1.text = a

dim b as string = Value(str,"...",1).replace("<a>","")
text1.text = b

...

顺便说下,看股票的话免费软件一大把,人家比你这个功能更强了,而且更新速度比这个网站更快

‘伍’ 用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 修改一个股票行情监测脚本 到了预定的股价就启动程序a.exe

Dim file1, file2 As String
Private Sub Command1_Click()

If Val(Text1.Text) > Val(Text2.Text) Then Shell (file1)
'text2.text为大于这个值时 执行
If Val(Text1.Text) < Val(Text3.Text) Then Shell (file2)
'text3.text为小于这个值时 执行
End Sub

Private Sub Command2_Click()
WebBrowser1.Navigate "http://.hexun.com/stock/q.php?code=" & Text4.Text
End Sub

Private Sub Command3_Click()
CommonDialog1.DialogTitle = "选择路径"
CommonDialog1.ShowOpen
file1 = CommonDialog1.FileName
End Sub
Private Sub Command4_Click()
CommonDialog1.DialogTitle = "选择路径"
CommonDialog1.ShowOpen
file2 = CommonDialog1.FileName
End Sub

Private Sub Form_Load()
Timer1.Interval = 6000
End Sub

Private Sub Timer1_Timer()
WebBrowser1.Refresh
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If Not (pDisp Is WebBrowser1.object) Then Exit Sub
Dim wenben As String
Dim a() As String
wenben = Me.WebBrowser1.Document.Body.innerText
a = Split(wenben, vbCrLf)
Text1.Text = wenben
For i = 0 To UBound(a)
If InStr(a(i), "代码:") > 0 And InStr(a(i), ".s") > 0 Then
Text1.Text = Right(a(i), (Len(a(i)) - InStr(a(i), ".s")) - 2)
Text5.Text = Mid(a(i), InStr(a(i), ".s") + 1, 2)
Exit For
End If
Next i
End Sub

‘捌’ 怎样用EXCEL 实时读取 股票日线数据

定量分析的第一步，是获取数据。
获取股票历史行情数据最方便的途径，就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员，电脑里一般不会有VB、VC之类的编程语言。
其实，大家的电脑中一般都有OFFICE。OFFICE中的EXCEL自带了一个VBA语言的编程环境。功能也很强大。
我用EXCEL里的VBA编写了一段代码，读取通达信股票行情软件的日线文件。已经测试通过。
代码如下。与爱好定量分析的朋友分享。
TypeMyType
a1AsLong'标示码
a2AsLong'日期
a3AsSingle'开盘价
a4AsSingle'最高价
a5AsSingle'最低价
a6AsSingle'收盘价
a7AsSingle'成交金额
a8AsLong'成交量
EndType
Sub按钮1_Click()
DimFile2AsInteger
DimbAsMyType
File1=FreeFile
Opensh600000.dayForBinaryAccessReadAs#File1i=1DoWhileNotEOF(File1)
Get#File1,,b
Cells(i,1)=b.a1
Cells(i,2)=b.a2
Cells(i,3)=b.a3
Cells(i,4)=b.a4
Cells(i,5)=b.a5
Cells(i,6)=b.a6

‘玖’ 作股票分析软件要用到什么编程语言用哪种最好

一般C+和VB结合了 VB比较用的多点 简单 http://tech.163.com/special/00091588/develop.html 学习的好地方 可以进去交流和学习吧

‘拾’ EXCEL如何用VBA自动获取每个股票近几天的涨幅

excel大量获取数据是比较慢的 你这种得用vb写dll多线程刷新数据才行 私聊