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