vb股票软件下载
A. 股票指标源代码中的“VB”是指什么
你这是因为代码不全，把下面的代码，粘贴到你公式前面，
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5;
主力撤: IF(V4<=0,V4,0),colorblue;
主力进: IF(V4>=0,V4,0),colorff00ff;
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*V5-2*SMA(V5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
再试一下，可以关注我，有问题再联系我。
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(',');
}
C. EXCEL如何用VBA自动获取每个股票近几天的涨幅
一般网页上的数据都可以通过VBA进行抓取，应用得好，可以实现对很很多资料的动态监测。
涨幅就是指目前这只股票的上涨幅度。
涨幅的计算公式：涨幅=(现价-上一个交易日收盘价）/上一个交易日收盘价*100%
例如：某只股票价格上一个交易日收盘价100，次日现价为110.01，就是股价涨幅为（110.01-100 ）/100*100%=10.01%.一般对于股票来说 就是涨停了!如果涨幅为0则表示今天没涨没跌，价格和前一个交易日持平。如果涨幅为负则称为跌幅。
比如:一支股票的涨幅是：10%、-5%等 。
D. 用VB语言能否编出股票期货类软件
可以，现在还有很多公司和企业、政府用的软件就是用VB编写的。这个也不例外，只不过现在出现的编程语言越来越多，实现某个软件可供选择比较多而已。
E. 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
F. 作股票分析软件要用到什么编程语言用哪种最好
一般C+和VB结合了 VB比较用的多点 简单 http://tech.163.com/special/00091588/develop.html 学习的好地方 可以进去交流和学习吧
G. 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
...
顺便说下,看股票的话免费软件一大把,人家比你这个功能更强了,而且更新速度比这个网站更快
H. 我要在手机上下截广发证券公司的股票软件，还可以交易的。
如果你想用手机交易的话，你必须下载广发手机交易买卖证券软件，然后把你的帐号登录进去，这样就可以顺利完成交易。
I. 用VB 读取通达信实时股票数据(现价，涨幅)
关键是接口
我估计现在没有免费的接口了！！！
所以你想自己编程获取实时数据，几乎不可能了！！！
总之，没有有效的网络实时数据支持，这是开源股软的最致命的地方！！！
J. 在VB.NET中如何使用新浪股票数据接口
这个你的拿钱和新浪那边买个接口 人家给你代码你复制到自己网站里就可以了