vb调期货行情
Ⅰ 好的股票期货技术指标
好的技术指标需要自己编辑,不能用默认的。
例如以下的指标都是自己编的
Ⅱ 各位程序猿哥哥,问一下什么软件可以通过编写代码交易股票期货c++ VB
只要能使用Windows平台ApI都可以 应该跟语言无关 跟平台有关 vs支持c c++ VB 都能编这种软件
Ⅲ 用VB 读取通达信实时股票数据(现价,涨幅)
关键是接口
我估计现在没有免费的接口了!!!
所以你想自己编程获取实时数据,几乎不可能了!!!
总之,没有有效的网络实时数据支持,这是开源股软的最致命的地方!!!
Ⅳ 我想学股票期货程序化交易编程,有谁知道程序化交易编程用哪种语言啊在网上看到C,VB,之类,要学哪种
。。。程序化交易。。现在都是期货比较多。
建议学习金字塔,功能比较强大。。
直接进他们公司的网站学习吧。。简单的编些程序都是比较简单。。
Ⅳ 用VB语言能否编出股票期货类软件
可以,现在还有很多公司和企业、政府用的软件就是用VB编写的。这个也不例外,只不过现在出现的编程语言越来越多,实现某个软件可供选择比较多而已。
Ⅵ 用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(',');
}
Ⅶ 本人对期货有所了解 ,但是对期货程序化交易是小白,求期货程序化交易高手来解答下~~~~
程序化-通俗的讲就是把交易思路语言化,让电脑按照程序的编写自动在达成条件时候买卖。
如果对C比较熟悉,就是有编程基础的话,学习程序化是非常简单的,重要的是交易思路,毕竟有正确的思路才能赚钱,对吧?
不同的程序化交易软件,基于的预言是略有不同的,但是都不是非常复杂。因为期货程序编写会用到许多数学公式等等,所以编写要熟读编写手册。很多没有基础的,通过看手册都可以自己编写的,所以不是非常难。
现在主流的程序化交易软件,开拓者tb、文华财经、以及最近从美国引进的一个,记不清叫什么了。
程序化在历史数据回测,和实盘交易是完全不同的。
希望可以继续交流~我也在研究
Ⅷ 我想从网页上(比如网易、新浪)上实时抓取大盘和个股的实时行情,请给出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