如何用VB制作幸运软件？一层窗户纸点破了很简单.doc

如何用VB制作幸运软件？一层窗户纸点破了很简单

———————————————————————————————— 作者：
———————————————————————————————— 日期：

5

个人收集整理 勿做商业用途
如何用VB制作幸运28软件?一层窗户纸，点破了很简单。
201２－3－13　1：０2:35 　幸运28软件站　原文地址：htｔｐ:/／wｗw.ｈuamanshａn.ｃoｍ／Originａｌ/30.hｔml

近期，幸运２８软件站经常碰到一些好学的玩家和网友,要求拜师学艺的。幸运28软件站首先感谢网友的信任,但是幸运28软件站接的软件单子是一单接一单,实在没有多余的时间去教徒解惑啊,在这里幸运28站要跟大家说声对不住啦。
今天就特别写了这篇?如何用VB制作幸运２８软件?文章作为给热心好学的玩家一个解惑,或者说是引入门的文章吧。其实幸运2８软件制作并不复杂，无非就是获取数据、然后对获取的数据进展提取加工处理,如果需要进展投注的话，最后再加上一个提交数据。实际上没有什么神秘的，一层窗户纸,点破了,就什么都明白了。
使用VB获取数据的方法有很多。其中有使用Webｂroｗser的．Document.body.iｎｎｅrHＴML的方法,有使用XML 的.ResponseＢｏｄy的方法，有使用Inet的Ｅｘecuｔe或者直接Openuｒl的方法，还有用Ｗinsoｃk控件或者其他ａpi控件的方法。这些方法都能做得到你想要的数据。看你使用哪种方法顺手了。截取数据的话，幸运28软件站通常使用Ｓplit、leｆｔ、right等文本操作函数进展截取,也可以使用正那么的方法进展过滤。提交数据的方法通常只有Get和Ｐost这２种方法。
一般来说获取数据、截取数据、提交数据都没有什么难度,稍微复杂点或者说需要点技术水平的活在于数据的处理上。比方有些人要根据上期开的号码,来推测下一期要投注的号码。如上期1004期开了16号，那么下期需要投注的号码是去掉尾数是４的号码,以及去掉双的号码,那么在软件中就需要写一些判断或者函数来进展处理。玩家提出的要求越多,功能越是复杂,判断就会越多。如前面提到的例子就需要在获得上期的号码16的根底上，对16这个数字进展单双的判断,对获取的期数１00４期，进展一个尾数的判断。
下面我举个使用XＭLＨＴTP例子：
 Priｖaｔe Ｓub Ｃoｍｍaｎd1_Ｃｌick〔〕 ＇获取乐途2８00的代码
　 u =　"<a　hｒef="httｐ:/／wｗw.280０ ／"> ://www．2800．com/</a＞"
Tｅｘt１．Ｔexｔ = GeｔBody〔u〕
Eｎd Sub
Privatｅ Sub Ｃommand2_Click〔) '提取网页的标题
　 　Laｂel２　= Splｉt(Ｓｐlｉｔ〔Ｔext1, ＂＜title>")(1〕, ＂</title>")(0〕
Eｎd Ｓub
Ｐublｉｃ　Ｆuncｔｉon　GetBoｄy(ByVal UＲL$,　Opｔiｏnal　ByVal　Coding$ ＝ "ＧＢ231２")
　 Ｄim ObjXMＬ
　 On Eｒｒｏr Resumｅ Next
　 　Sｅt ObjXＭL = CreａteＯbjecｔ("Ｍiｃrosofｔ.XＭLHＴTP"〕
　 Ｗith ObjXML
　 　　 .Open "Gｅt"，　URＬ,　False, "", "＂
　　　 .setRequestHeadeｒ　"Ｉf-Mｏｄified－Since＂， "０"
　 .Ｓend
　 ＧeｔＢody　= .RｅsｐonsｅBody
Ｅnｄ　With
　　 GetBody =　ＢyteｓToBsｔr(GetBody， Cｏｄing)
Ｓeｔ ＯbjXML =　Nothiｎg
Ｅnd Fuｎcｔion
Puｂlic Fuｎｃtion BytesTｏBstr(sｔrＢｏdy，　ＣoｄeＢase〕
　Ｄim　ＯbｊStｒeaｍ
　　 Set　ObjStreａm　=　ＣrｅateObｊeｃt(＂Adoｄｂ．Ｓtream")
　　 Wｉtｈ ObjStream
　　 　.Type = １
　　　 　 ．Moｄｅ =　3
　　 .Ｏpｅｎ
　.Ｗriｔｅ ｓtrＢody
　 　 ．Poｓiｔiｏn = ０
　 　　.Ｔype = 2
.Charset =　ＣoｄeBase
　 　BytesToＢstｒ = .ＲｅａdText
　　　 .Clｏse
Eｎｄ With
　 　 Sｅｔ ObjSｔｒeam =　Notｈinｇ
End Fｕnctiｏn

这个例子就是最根底和最简单的获取数据和截取数据的方法，复杂的软件也是以这个为根底的,只不过会增加一些判断之类的。如投注是输了，还是赢了，要不要翻倍,翻多少倍等等。
最后再啰嗦几句：百度和google是你最好的教师,要学会使用搜索引擎去解决你的问题，也要学会去专业的网站和论坛提问,只有这样你才会进步的更快,才会有更扎实的根底。