当前位置:首页 » 分析预测 » vb开发股票盘后分析软件
扩展阅读
股票5档应该买哪一档 2024-10-05 22:40:35
信息快的股票软件下载 2024-10-05 22:39:44

vb开发股票盘后分析软件

发布时间: 2021-05-15 15:35:49

① 用VB 读取通达信实时股票数据(现价,涨幅)

对rmb收入有一定帮忙吗?.呵呵.好东东.那我也做作.

..这样呀.那我帮你看看好了 你把你的源代码发一下

你的意思是某些控件句柄你没法获取到..还是其他意思

算了.发邮箱[email protected] 源代码.附带说明.还有一个什么股票软件.一起.或者给个地址.完整一下.要不又要问你这那.
个人感觉好像没什么用吧..看了先

② 如果编写一个股票分析的软件,用什么软件编写比较好,而且股票的数据从何而来

微软的visual C++ 比较好
用起来方便 初学者比较适用

至于股票数据
据我所知
要向证券所代理
一般都要收费的

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

⑤ 急急急。。。帮我用VB程序编写一个股票的小程序,要用到循环结构哦

rand(),0--1之间的随机数,然后36×rand()取整数,就是36间的随机数

⑥ 求一款盘后预测股票的软件,要精确的提示个股的那种,短线、中线都可以免费的

连高收费的股票软件都不准确,你还想免费的,看来是没有

⑦ VB 股票 自动委托 编程 软件 怎样用

自动委托没什么大用途的 只是为了方便一些没时间操作电脑的人用。能下单就可以了

⑧ 哪位哥们用VB开发过股票软件

采用vb中的浏览器控件。然后自己弄个空间弄个网站,然后弄个空白页,插入股票的代码,然后在用浏览器控件链接到上面就可以了。

⑨ 求vb高手 做一个软件实现股票自动买卖 我会通过另一个软件计算买卖时间和价格,用vb实现买卖过程

这个说复杂也容易,说容易也复杂。
容易就在于算法大家都知道,只要能实现查询,然后根据设计需要进行交易就是了。
复杂就在于凡属于金融领域的,不管是杀毒软件还是防火墙,都是重点监控种类。尤其是证券公司和银行,对于客户没有使用它们的终端而发生资金变动的话,那岂不是银行或证券公司的漏洞了?
要获得银行的访问权限,你看现在的银行主页,一输入密码就需要加载什么控件,那就是保护措施啊。然后证券公司的访问权限。当然,如果你的钱全部转到了证券公司,那只要证券公司的权限就可以了。

所以现在能够实现自动买卖的软件,都是证券公司自己写的程序。你现在应该知道其原因了。证券公司可不会随便让你查询它的档案的。

⑩ 我想用VB做个教客户如何使用股票交易软件查询功能的程序,要求界面和真正的股票交易软件一样

去参考下 大智慧 嘛 那软件很多人用 而且也不错``