江恩螺旋图彩票选号法工具（江恩螺旋四方图选号法）

内容导航：

下面是一个“彩票选号小助手”的Visual Basic（VB）的程序代码。下面是设计界面，求高人逐字...

听别人说有一种软件叫彩票自动选号器，不知道哪里有这种自动选号器？

彩票选号工具有机选吗？

江恩选号法热线怎么画？有图最好，谢谢

c求江恩四方图的变盘时间周期：从2012年到2015年。好的话领奖励30金币。

江恩的九点图及三天图?

求江恩四方图单独软件

Q1：下面是一个“彩票选号小助手”的Visual Basic（VB）的程序代码。下面是设计界面，求高人逐字...

Private Sub cmdStart_Click()
Dim i As Integer‘定义i为整形变量
For i = 0 To 4’i从0 到 4 进行5次循环
If option1(i).Value Then‘如果选中了第i+1注（单选框第一到第五注是option1（0） 到option1（4））
Exit For’如果满足，退出for循环
End If‘结束判断
Next’for循环的结束语句
base = i * 7‘上面利用一个循环把你选中的第几注赋值给了i 此时把i*7赋值给变量base cmdStop.Enabled = True’把停职按钮的可用性变为true 即让停止按钮可用
cmdStart.Enabled = False‘让开始按钮不可用
cmdAuto.Enabled = False‘让自动按钮不可用
cmdStop.SetFocus’让停止按钮获得焦点（就是那一圈围着按钮的特别细的虚线）
start = True’令变量start的逻辑属性为真
Do While start‘这是一个do loop循环 如果start为真就一直循环
Randomize Timer’让随机数每次都不一样，
i = Rnd() * 6‘让i取1到6的随机数
lblNum(i + base).Caption = Trim(Str(Int(Rnd() * IIf(i = 6, 5, 10))))
'这里lblNum(i + base).Caption 指的是第几个幸运号码框，base是之前判定了的你选的第几注乘以了6（每行6个），也就是从第几行开始，i是随机的，后面的代码trim是去掉两边的空格，str是把内容改为字符串格式，int是取整，后面那个没看太懂，个人觉得这块有错，
DoEvents‘转让控制权，以便让操作系统处理其它的事件
If auto Then’如果auto为真（就是点了自动按钮）
If Timer - sTime > sDiff Then‘这缺少相应的在通用声明区的定义语句，看不太懂
Exit Do’跳出do loop循环
End If‘结束判断
End If’结束判断
Loop
End Sub
Private Sub cmdStop_Click()’停止按钮的单击事件
cmdStop.Enabled = False‘停止按钮不可用
i = 0’让i=0
Do While True‘do loop循环，这个循环判定条件一直是真，通过内部的结束循环语句来结束循环
lblNum(i + base).Caption = Trim(Str(Int(Rnd() * IIf(i = 6, 5, 10))))’同之前的
i = i + 1‘i从0开始依次累加
If i = 7 Then
Exit Do’如果i=7 结束循环
End If
p = Rnd / 5‘在0 到0.2中随机取值
N = Timer’n为系统计时器数值
Do While Timer - N < p‘
Randomize Timer
r = Rnd() * (6 - i) + i’让r在i到6-i间随机取值
lblNum(r + base).Caption = Trim(Str(Int(Rnd() * IIf(r = 6, 5, 10))))
DoEvents‘转让控制权，以便让操作系统处理其它的事件
Loop
Loop
start = False‘start属性变为false
cmdStart.Enabled = True’开始按钮可用
cmdAuto.Enabled = True‘自动按钮可用
cmdStart.SetFocus‘开始按钮得到焦点
End Sub
Private Sub Form_Load()’窗体加载事件
cmdStop.Enabled = False‘停止按钮不可用
For i = 0 To 34
lblNum(i).Caption = ""
Next’把34个数值全清空
End Sub
Private Sub lblNum_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)‘lblNum的鼠标按下事件
Dim r As Integer
If (Not start) And (Not auto) Then’如果没开始，没点自动
r = Index Mod 7‘index意思是第几个，从0开始，比如第一行的第二个index就是1，第二行的第一个index就是7. mod 7 就是对7 取余取出来的数值表示他是这一行的第几个。
manu = True’令menu为真
Do While manu
lblNum(Index) = Trim(Str(Int(Rnd() * IIf(r = 6, 5, 10))))
DoEvents‘转让控制权，以便让操作系统处理其它的事件
Loop
End If
End Sub
Private Sub lblNum_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
manu = False‘鼠标松开时，menu为假，停止上面鼠标按下事件当中的循环。
End Sub
你这个代码有不少没定义的东西，第一个过程前面是通用声明区，里面应该会有几个定义的内容，不过你没发上来，所以有些东西暂时解释不了。
而且这里没有那个“自动”按钮的代码。
水平有限 还望采纳。

Q2：听别人说有一种软件叫彩票自动选号器，不知道哪里有这种自动选号器？

试试这款选号软件说不定你能中大奖!!!
能随机选号(各种彩票号码)
能查开奖情况
能看双色球走势图
永盛彩票选号器
v8.8
（免费）
百度搜索
"永盛彩票选号器
v8.8"第一条就是
或到
"非凡软件站"
查找就有.
快速自动随机选号
选号后复制、导出、打印都可。

Q3：彩票选号工具有机选吗？

是有机选的

Q4：江恩选号法热线怎么画？有图最好，谢谢

江恩理论在股市上也只是一种周期性猜测，彩票市场还是靠直觉选一下算了，别当真

Q5：c求江恩四方图的变盘时间周期：从2012年到2015年。好的话领奖励30金币。

图一

沪市低点江恩四方图
图二

沪市高点江恩四方图
图三、江恩高点时间周期图
图四、江恩低点时间周期图二
江恩
认为
四方
形中心、
十字线及对角线上的数
字有可能是市场发生重要转折的价位，值得提高警惕。

江恩
螺旋
四方
形的制作方法
:
1
、选择历史性高位或低位做为
四方
形的中点，本图采
用
6124.
2
、确定每一价格上升或下降的单位。
江恩
采
用
的周期循环众多，经过
这两天
用
不同周期制作
四方
图，
发现七这个价格单位在
四方
图表中的十
字线上对上证指数的支撑和阻力位有着惊人的表现。

本图表以
6124
为中点，每下降
7
个价格单位为一数值，以逆时针方向
循环，
形成逐渐扩展开的
江恩
螺旋
四方
形。
江恩
螺旋
四方
形的重要支持
/
阻力位将会出现在：
1
、
四方
形的纵轴上的价位；
2
、
四方
形横轴上的价位；
3
、
四方
形对角
线上的价位
江恩正方（转）
江恩正方是一种股票交易时常使用的价位分析方法。主要根据江恩理论编制而成。
正方由
9*9=81
个格组成。每个格代表不同的价格，有颜色的格所代表的价位是重要的
转折点。用于计算阻力位与支撑位。
设置方法：
设置起始价位。
起始价位一般是一段时期的重要转折价。
缺省为当前分析股票的当前价；
可修改每一个增加单位的价格；
可改变各个格的排列方式；
可改变支撑式及阻力式；
改变参数后请按回车键确认。
江恩螺旋四方形绘制方法

Q6：江恩的九点图及三天图?

三天图的意思是，将市场的波动，以三天的活动为记录的基础。这三天包括周六及周日。三天图表的规则是，当三天的最低水平下破，则表示市场会向下，当三天的最高水平上破，则表示市场会出现新高。
绘画方法上，可按照以下步骤：
1)
当市场从低位上升，连续三天出现较高的底位及高位，图表上的线应移至第三天的高点。若市场下跌两天后第三天再创新高，则图表上的线应垂直上移至当天的高点。
2)
当市场连续三天创新低时，图表的线便可下移至第三天低位的水平，若市场继续下跌，则可将图表上的线垂直下移至当天的低点。
3)
若市场连续三天创新高点，则“三天图”表便可回升。
除了“三天图”外，江恩还建议使用一种名为“九点平均波动图”分析市势。

Q7：求江恩四方图单独软件

有轮中轮单独的软件，暂时没有见过四方形单独的软件。呵呵……