- 博客(17)
- 资源 (5)
- 收藏
- 关注
RSS订阅原创 一些数字分组的计算结果，也许对你的二码运算有用
把2N个数分成N份，每份2个号码，应该共有combin(2N,N)种，但生成的二码重复太多，对于观测二码很不方便。能不能让生成的组数中二码只出现一次，也就是最小覆盖？现分享给大家！
2023-01-24 09:21:10
1418
原创 彩票算法系列讲座（二）
七个小矮人自从白雪公主跟王子走了后，七个小矮人的生活就没有了乐趣。一天，他们聚在一起，闷闷不乐。老七说：我想白雪公主。老六说：我也想……。老五说：我好像听到她在唱歌。老四说：我就在心里想，我不说。老三说：我情愿她一直不醒过来。老二说：别说了，要想哭……。老大吼：烦不烦，3D开奖了！后来，他们一起出去找白雪公主了，巫婆（王后）给了他们一张路线图，就是3D历史开奖号。老大想：我做个表率走远点找，于...
2019-02-19 18:01:06
4059
原创 彩票算法系列讲座（一）
第一式：加勒比海盗 相传，一群加勒比海盗（10人）遇到风暴船要沉没，必须要扔一个到海里去，扔谁呢？ 船长说，以昨天的3D开奖号来定吧？10个按年龄顺时针坐一圈，如下图：昨天开奖号是425，那么规则如下：425按从小到大排列成245，从2号开始数，每次报数4个人，数到4的离开圈子，共数5次，最后报数的那个人扔到海里去。结果如下：第1轮2开始报数，2345，5离开；第2轮6开始报数，6789，...
2019-02-19 17:51:39
11954
5
原创 组合方程的近似算法
在进行组合数的计算时，如果数值比较大，则计算起来很麻烦的，用斯特林公式逼近也需要很多步骤。特别的，如果在组合数的总元素的取出元素有一个是未知数时，计算就没法用公式了。所以我在这里公布一个近似算法给大家：1.对于方程C(n,x)=a，求取出元素x，近似算法是：x=ln(a)*ln(a)/n举例：求C(10,x)=250，我们知道C(10,5)=252，也就是x=5，套用公式：
2017-01-16 17:59:17
2835
1
原创 彩票的两种分析方法
概率均值二分K线图分析法：算法是取当前元素的数学平均值为基本，当本值大于均值则在上期数上加超过值，小于则在上期数上减不足值，即大于则阳线，小于则阴线。这样连线后就是K线了。如对数进行K线方法：33个红号，每个号码的平均遗漏（我称之为“再”）是5.5期，那么可以对33个号进行K线分析，拿号1举例。统计最近100期或从2003年第一期开始都可以。设初始值为0，下一次开出1后当前值＝遗漏值（再）
2013-07-07 10:50:23
6807
2
转载 26个ASP.NET常用性能优化方法
26个ASP.NET常用性能优化方法数据库访问性能优化 数据库的连接和关闭 访问数据库资源需要创建连接、打开连接和关闭连接几个操作。这些过程需要多次与数据库交换信息以通过身份验证，比较耗费服务器资源。 ASP.NET中提供了连接池(Connection Pool)改善打开和关闭数据库对性能的影响。系统将用户的数据库连接放在连接池中，需要时取出，关闭时收回连接，等待下一次
2012-03-02 08:50:23
535
转载 将Recordset作为XML保存
将Recordset作为XML保存微软使得将ActiveX数据对象（ADO）的Recordset作为XML在ADO 2.1里保存成为可能。这对于将Recordset保存在客户计算机上用于脱机使用很有用处。如果你希望通过可扩展样式表语言转换（XSLT）来操控Recordset的数据，那么这一能力也是很有用的。
2008-10-16 21:59:00
878
转载 VB常用代码总结（一）【转】
VB常用代码总结（一）【转】 移动无标题栏的窗体(borderstyle=none)dim mouseX as integerdim mouseY as integerdim moveX as integerdim moveY as integerdim down as booleanform_mousedown: mousedown事件down=
2008-10-16 20:34:00
952
转载 VB常用代码总结（二）【转】
VB常用代码总结（二）【转】2008-07-10 00:04使用API调用Winodws各种通用对话框(Common Diaglog)的方法（二）1.选择目录/文件夹对话框将以下代码置于一模块中Option Explicit 调用方式:: string = BrowseForFolders(Hwnd,TitleOfDialog) 例如:String1 = Bro
2008-10-16 20:32:00
976
原创 vb获得文件版本
Const VS_FFI_SIGNATURE = &HFEEF04BDConst VS_FFI_STRUCVERSION = &H10000Const VS_FFI_FILEFLAGSMASK = &H3F&Const VS_FF_DEBUG = &H1Const VS_FF_PRERELEASE = &H2Const VS_FF_PATCHED = &H4Const VS_FF_PRIVATEB
2008-09-09 13:37:00
1338
原创 如何快速产生一个1-n的无重复随机数序列
比如拿个54张牌，我随机抽一张，就是第一个随机数，再从53张里再随机抽一个，就是第二个随机数，抽N个都不会重复。可以生成一个顺序链表,然后随机从里面取数据,取一个,删一个链表节点。
2008-08-27 19:52:00
1399
原创 Repeater导出EXCEL
数据绑定到Repeater1 ，下面是将Repeater1的内容导出的示例代码 System.IO.StringWriter sw = new System.IO.StringWriter(); System.Web.UI.HtmlTextWriter hw = new System.Web.UI.HtmlTextWriter(sw);
2008-08-26 20:38:00
4083
4
原创 窗体特效:慢慢从透明到不透明
实现一个窗体,在弹出时要慢慢从透明到不透明的特效 private double opacityIncrement = 0.1; private const int changeInterval = 25; private Timer timer1; //表单载入 private void Form1_Load(object se
2008-08-26 07:49:00
789
原创 字符转换成UTF-8
Function StrConvFromUTF8(aBytes() As Byte) As String Dim cStream As ADODB.Stream Set cStream = New ADODB.Stream cStream.Open cStream.Type = adTypeBinary cStream.Write aBytes
2008-08-26 07:46:00
702
原创 grid的编辑功能
Private Sub MSHFlexGrid1_Click() Call SetFlexTxtBoxEnd Sub-------------------------------------------Private Sub FlexTxtBox_GotFocus() FlexTxtBox.SelStart = 0 FlexTxtBox.SelLength = Len(Fl
2008-08-26 07:33:00
596
79个心理测量量表,当自己心情不好时使用!
2009-03-07
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人