当前位置:首页 » 股票入门 » vb股票交易策略源码
扩展阅读
设计总院股票历史股价 2023-08-31 22:08:17
股票开通otc有风险吗 2023-08-31 22:03:12
短线买股票一天最好时间 2023-08-31 22:02:59

vb股票交易策略源码

发布时间: 2022-11-12 09:22:15

‘壹’ vb6.0编制股票交易程序公式

很复杂,不可以三言两语说清楚的。

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

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

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

‘叁’ 在VB.NET中如何使用新浪股票数据接口

基本没有,你得和人家有合作关系

‘肆’ 用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(',');
}

‘伍’ 股票公式源码 谁能帮我翻译一下,跪谢了 我实在是看不懂啊

V1赋值:是否最后一个周期
V2赋值:N1*VARTIME日前的最高价=2*N1+1*VARTIME日内最高价的最高值
V3赋值:V2的N1日过滤
V4赋值:若V3则将最近N1+1周期置为1
V5赋值:V4的N1日过滤
V6赋值:V5 OR V1
V7赋值:N1日前的最低价=2*N1+1日内最低价的最低值
V8赋值:V7的N1日过滤
V9赋值:若V8则将最近N1+1周期置为1
VA赋值:V9的N1日过滤
VB赋值:VA AND 取反
VC赋值:若V6则将最近昨日上次VB距今天数+1周期置为1
VD赋值:VC>昨日VC
VE赋值:若VD则将最近2周期置为1
VF赋值:VE>昨日VE
V10赋值:若VFANDCOUNT(V6,昨日上次VB距今天数+2)=0则将最近昨日上次VB距今天数+2周期置为1
V11赋值:V10>昨日V10
V12赋值:若V11ANDCOUNT(V6,昨日上次VB距今天数+2)=0则将最近昨日上次VB距今天数+2周期置为1
V13赋值:V12>昨日V12
V14赋值:如果V6,返回统计昨日上次V6距今天数+1日中满足VB的天数,否则返回0
V15赋值:如果V14=1ANDV6,返回上次VF距今天数,否则返回0
V16赋值:如果V6ANDREF(最低价,上次VF距今天数)>=上次V11距今天数日前的最低价,返回上次V11距今天数,否则返回上次VF距今天数
V17赋值:如果V14=2ANDV6,返回V16,否则返回0
V18赋值:如果V14>=3ANDV6,返回如果V6ANDREF(最低价,V16)>=上次V13距今天数日前的最低价,返回上次V13距今天数,否则返回V16,否则返回0
V19赋值:V15+V17+V18
V1A赋值:若V6则将最近V19周期置为1
V1B赋值:V1A>昨日V1A
V1C赋值:若V1B则将最近2周期置为1
V1D赋值:V1C>昨日V1C
V1E赋值:V1D OR V1
V1F赋值:若V1E则将最近昨日上次V6距今天数+1周期置为1
V20赋值:V1F>昨日V1F
V21赋值:若V20则将最近2周期置为1
V22赋值:V21>昨日V21
V23赋值:若V22ANDCOUNT(V1E,昨日上次V6距今天数+2)=0则将最近昨日上次V6距今天数+2周期置为1
V24赋值:V23>昨日V23
V25赋值:若V24ANDCOUNT(V1E,昨日上次V6距今天数+2)=0则将最近昨日上次V6距今天数+2周期置为1
V26赋值:V25>昨日V25
V27赋值:如果V1E,返回统计昨日上次V1E距今天数+1日中满足V5的天数,否则返回0
V28赋值:如果V27=1ANDV1E,返回上次V22距今天数,否则返回0
V29赋值:如果V1EANDREF(最高价,上次V22距今天数)<=上次V24距今天数日前的最高价,返回上次V24距今天数,否则返回上次V22距今天数
V2A赋值:如果V27=2ANDV1E,返回V29,否则返回0
V2B赋值:如果V27>=3ANDV1E,返回如果V1EANDREF(最高价,V29)<=上次V26距今天数日前的最高价,返回上次V26距今天数,否则返回V29,否则返回0
V2C赋值:V28+V2A+V2B
V2D赋值:若V1E则将最近V2C周期置为1
V2E赋值:V2D>昨日V2D
V2F赋值:若V2E则将最近2周期置为1
V30赋值:V2F>昨日V2F
V31赋值:若V1则将最近上次V1D距今天数+1周期置为1
V32赋值:V31>昨日V31
V33赋值:若V1则将最近上次V30距今天数+1周期置为1
V34赋值:V33>昨日V33
V35赋值:如果上次V32距今天数<上次V34距今天数,返回V32,否则返回V34
V36赋值:如果上次V32距今天数<上次V34距今天数,返回最低价,否则返回最高价
V37赋值:若V1则将最近上次V1D距今天数+1周期置为1
V38赋值:V37>昨日V37
V39赋值:若V38则将最近昨日上次V1D距今天数+2周期置为1
V3A赋值:V39>昨日V39
当满足条件V3A*VARTIME时,在最低价位置画直线起点,当满足条件V38*VARTIME时,在最低价位置画直线终点,1表示是否延长.,LINETHICK1,画黄色,LINEDOT
V3B赋值:若V1则将最近上次V30距今天数+1周期置为1
V3C赋值:V3B>昨日V3B
V3D赋值:若V3C则将最近昨日上次V30距今天数+2周期置为1
V3E赋值:V3D>昨日V3D
当满足条件V3E*VARTIME时,在最高价位置画直线起点,当满足条件V3C*VARTIME时,在最高价位置画直线终点,1表示是否延长.,LINETHICK1,画黄色,LINEDOT
输出 XX1: 上次V38距今天数*VARTIME日前的最低价,COLORCCFF99,LINETHICK2
输出 前二低: 上次V3A距今天数*VARTIME日前的最低价,画洋红色,LINETHICK2
输出 YY1: 上次V3C距今天数*VARTIME日前的最高价,COLORCCFF99,LINETHICK2
输出 前二高: 上次V3E距今天数*VARTIME日前的最高价,画洋红色,LINETHICK2
当满足条件是否最后一个周期*VARTIME时,在YY1位置书写数字
当满足条件是否最后一个周期*VARTIME时,在XX1位置书写数字
当满足条件是否最后一个周期*VARTIME时,在前二低位置书写数字
当满足条件是否最后一个周期*VARTIME时,在前二高位置书写数字

含义:对应代码的每一行

‘陆’ 股票交易策略具体有哪些

股票交易策略常见的是趋势型策略,通俗说,就是追涨杀跌。从众心理是趋势的主要基础。趋势也是股市运行的最明显特征。虽然牛市即具有明显上涨趋势的时间只占总时间的15%左右,但由于它的特征显着,还是受到众多的投资者偏爱。CMC Markets提醒交易者,股票交易策略是一种在理想模型中抽象概括出的东西。在实际中,大可不必说只用一种基本策略。把不同的策略组合进一个交易系统一般能得到更好的甚至是出奇好的效果稳定盈利是一种境界。

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

36选7,25选6这是彩票不是股票
===========================================
'给你个36选7的
Private Sub Form_click()
Me.Cls: Randomize
Dim i%, s%(6), t%
For i = 0 To 6
Do
t = Int(Rnd * 36 + 1)
Loop While f(t, s())
s(i) = t: Print t;
Next
End Sub
Function f(ByVal t As Integer, s() As Integer) As Boolean
Dim a
For Each a In s
If t = a Then f = True
Next
End Function

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

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

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

可以在http://stock.business.sohu.com/p/pl.php
用VB的 WebBrowser1_DownloadComplete 做。
引用Internet Controls

‘拾’ 股票指标源代码中的“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;
再试一下,可以关注我,有问题再联系我。