王峰炬

摘要：自然数m,n,m∈(1,x),n∈(1,y)，求m,n互质（即m,n 最大公约数为1）的概率x,y 驱于无穷大时，此概率的极限为6/π^2Function GETPMN(ByVal X As Long, Y As Long) As DoubleDim a() As Byte, i As Long,... 阅读全文

摘要：在http://blog.csdn.net/northwolves/archive/2005/11/18/532695.aspx 文章中,对小素数的列举进行了探讨,今天发现，由于小素数的倍数比较多，过滤所用时间较长。所以先对奇数进行初步过滤，可以达到提速的效果，继续改进如下：Private Sub... 阅读全文

摘要：半年前曾在我的BLOG发过一篇文章(http://blog.csdn.net/northwolves/archive/2005/04/18/351998.aspx),对素数的快速列举进行了初步探讨，随后的讨论在http://community.csdn.net/Expert/topi... 阅读全文

摘要：曾经看到有些软件能够实现这个效果，无非是向LISTBOX发送消息，获得光标所在位置的ITEM；或者干脆模拟一个鼠标左键的单击事件。下面用两种方法分别一试：方法1 Sendmessage 向LISTBOX发送消息Private Declare Function SendMessage Lib "u... 阅读全文

摘要：在窗体上镂空文字: 我想死你了 Private Declare Function BeginPath Lib "gdi32" (ByVal hdc As Long) As LongPrivate Declare Function EndPath Lib "gdi32" (ByVal hdc As ... 阅读全文

摘要：笔者在对素数的规律研究中,发现Sieve of Eratosthenes 方法对素数的筛选还是比较快的(参见拙作href="http://blog.csdn.net/northwolves/archive/2005/04/18/351998.aspx">http://blog.csdn.net/n... 阅读全文

摘要：EXCEL SHEET中如何添加下拉框或者 文本框,命令按钮?下面的方法就可以：添加命令按钮1 新建WORKSHEET2 打开Visiual Basic编辑器3 选择SHEET1 的Worksheet_SelectionChange 事件4 编写代码如下：Private Sub Workshe... 阅读全文