王峰炬

摘要： '下面代码可以实现将某网页的某框架内容显示在新的WEBBROWSER中. 'add two webbrowser and a commandbutton to form1: Private Sub Command1_Click()Dim html As Stringhtml = WebBrowse... 阅读全文

摘要： 输出这样的二维阵列: 1 2 3 4 12 13 14 511 16 15 610 9 8 7 分析: 填充如此一个n*n阵列 ,先观察规律: n=1 1 n=2 1 24 3 对于n*n阵列,可以先将1-4*n 填充四周,内部用一个(n-2)*(n-2) 的阵列加上4*(n-... 阅读全文

摘要： 输出这样的二维阵列: 1 3 4 10 112 5 9 12 196 8 13 18 207 14 17 21 2415 16 22 23 25 Sub spiralmetrix(ByVal n As Integer)n = n - 1Dim i As Intege... 阅读全文

摘要： 输出这样的二维阵列: 1 2 3 4 12 13 14 511 16 15 610 9 8 7 Private Sub Command1_Click()spiral 17Debug.Printspiral 18End Sub Sub spiral(ByV... 阅读全文

摘要： 许多工作岗位需要每天或每月排一次班,如何用WORD实现自动排班?笔者曾对此做过一些研究,不尽人意. 在一位网友(chewinggum(口香糖·把减肥列入下一个五年计划) )提供了很不错的代码(http://community.csdn.net/Expert/topic/4304/4304006.x... 阅读全文