『壹』 怎樣用 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多線程刷新數據才行 私聊