复制代码 代码如下:$t1 = explode(' ', microtime()); // ... 执行代码 ... $t2 = explode(' ', microtime()); echo ($t2[1]-$t1[1]).'s '.($t2[0]-$t1[0]).'ms'; 其实稍微试一下, 就能发现这份代码有个严重的问题. 虽然 t2 得到的时间肯定比 t1 大, 但不代表, 它的微秒数就一... [阅读全文]

效果图:演示代码: 日期插件 [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]... [阅读全文]

VB无法在日期/时间字段中存放和测量累计时间 日期/时间存放成特定时间点而不是个时间跨度并且无法在个日期/时间变量中存 放超过24小时值如输入9:30输入不是某台设备工作时间长度而是个特定时间 即是早晨9:30在日期/时间字段中输入26:30VB会显示出错信息认为这不是个合法 输入VB不是不能进行日期/时间字段累加计算它在内部以浮点值形式存放能够进 行累加计算但结果不是我们希望那样　　笔者在工作中... [阅读全文]

package jianan; /** * Created by IntelliJ IDEA. * User: Christen * Date: 2008-2-4 * Time: 9:43:51 */ import java.awt.*; import java.awt.event.*; import java.lang.*; import javax.swing.*; pub... [阅读全文]

什么是一个高效的软件？一个高效的软件不仅应该比实现同样功能的软件运行得更快，还应该消耗更少的系统资源。这篇文章汇集了作者在使用VB进行软件开发时积累下来的一些经验，通过一些简单的例子来向你展示如何写出高效的VB代码。其中包含了一些可能对VB程序员非常有帮助的技术。在开始之前，先让我陈清几个概念。 　　让代码一次成型：在我接触到的程序员中，有很多人喜欢先根据功能需求把代码写出来，然后在此基础上优化... [阅读全文]

：打开快捷方式以及程序 SHELL "路径" 2：打开硬盘或文件 Shell "explorer F:\", vbNormalFocus 3：打开“我的电脑”“资源管理器”…… Shell "EXPLORER.EXE /n, /e, ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}" 4：打开网页 SHELL ... [阅读全文]

昨天写了一个文章,中缀表达式转后缀表达式, http://www./html/20081006/66338.html现在就用这个方式再实现计算器.. 表达式一旦转换成后缀表达式再进行计算就简单的不得了.遇到一个符号就弹出离他最近的两个操作数然后进行这个操作符指定的运算就ok了...运算完成后压栈继续扫描,依次重复...等到操作符没有了.所有的运算也就结束了.结果也就出来了...不必再判断优先级的什... [阅读全文]

下面是个VB抓屏保存为文件源文件很不错有精力可以参考下保存在标准模块Option ExplicitPublic Type BITMAPFILEHEADER bfType(0 To 1) As Byte bfSize As Long bfReserved1 As Integer bfReserved2 As Integer bfOffBits As LongEn... [阅读全文]

现在所什么事情都是要讲效率，我们编程也要讲效率，尽管现在的计算机，速度是不成问题，但是，如果一行代码能完成，为什么要用更多的代码呢？现在介绍VB中一些可用一行代码完成的技巧。大家有其他好的例子，欢迎留言交流！1、下列代码，则是对逻辑运算不清楚造成If A=true ThenC= Not BElseC= BEnd If 　可以：C=A XOR B 2、如果加上下列代码：If C=true thenD... [阅读全文]

已下是代码，程序测试通过~~~~Private Sub Command1_Click() 　　WebBrowser1.Navigate \"http://localhost/\"　　Timer1.Enabled = TrueEnd Sub　　Private Sub Timer1_Timer()　　Dim doc, objhtml As Object　　Dim i As Integer　　Dim s... [阅读全文]

---- vb 无 法 在 日 期/ 时 间 字 段 中 存 放 和 测 量 累 计 时 间 日 期/ 时 间 存 放 成 特 定 时 间 点 而 不 是 个 时 间 跨 度 并 且 无 法 在 个 日 期/ 时 间 变 量 中 存 放 超 过24 小 时 值 如 输 入9:30 输 入 不 是 某 台 设 备 工 作 时 间 长 度 而 是 个 ... [阅读全文]

function calcage(datempdateofbirth as variant) as eger calcage = (datedf(\"y\",datempdateofbirth,date)/365.25) end function... [阅读全文]

using; using.Collections.Generic; using.ComponentModel; using.Data; using.Drawing; using.Linq; using.Text; using.Windows.Forms; HaoltCalculator ...{ publicpartial_MainFrm:Form ...{ p... [阅读全文]

package d344; import javax.swing.*; import java.util.StringTokenizer; import java.awt.*; import java.awt.event.*; //import java.math.*; public class Calculator implements ActionListener { //初始化界面按纽 JF... [阅读全文]