这样。不过只是个精确到纳秒的计时器，不是精确到纳秒的当前时间。windows好像只能拿到ms精度的当前时间吧，不是很清楚。
创新互联公司专业为企业提供崖州网站建设、崖州做网站、崖州网站设计、崖州网站制作等企业网站建设、网页设计与制作、崖州企业网站模板建站服务，10余年崖州做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
package main
import (
"syscall"
"time"
"unsafe"
)
func NewStopWatch() func() time.Duration {
var QPCTimer func() func() time.Duration
QPCTimer = func() func() time.Duration {
lib, _ := syscall.LoadLibrary("kernel32.dll")
qpc, _ := syscall.GetProcAddress(lib, "QueryPerformanceCounter")
qpf, _ := syscall.GetProcAddress(lib, "QueryPerformanceFrequency")
if qpc == 0 || qpf == 0 {
return nil
}
var freq, start uint64
syscall.Syscall(qpf, 1, uintptr(unsafe.Pointer(freq)), 0, 0)
syscall.Syscall(qpc, 1, uintptr(unsafe.Pointer(start)), 0, 0)
if freq = 0 {
return nil
}
freqns := float64(freq) / 1e9
return func() time.Duration {
var now uint64
syscall.Syscall(qpc, 1, uintptr(unsafe.Pointer(now)), 0, 0)
return time.Duration(float64(now-start) / freqns)
}
}
var StopWatch func() time.Duration
if StopWatch = QPCTimer(); StopWatch == nil {
// Fallback implementation
start := time.Now()
StopWatch = func() time.Duration { return time.Since(start) }
}
return StopWatch
}
func main() {
// Call a new stop watch to create one from this moment on.
watch := NewStopWatch()
// Do some stuff that takes time.
time.Sleep(1)
// Call the stop watch itself and it will return a time.Duration
dur := watch()
}
这和语言没关系，操作系统要提供这样的原语。linux和windows都是可以的。
1.可以用DateDiff函数，返回值表示两个指定日期间的时间间隔。
2.也可以把两个日期直接相减：
a = Now - CDate("2014-1-1") '2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1") '2014年1月1日到2014年3月1日，共这么多天。
vb的函数是强大的，闰年和平年它自己会处理，无需担心。
追问：
那需要什么控件，能详细说一下吗
回答：
不需要任何控件呢，是系统自带的函数呢，你写到代码里面试试就可以了。
你稍等，我给你写代码：
'窗体弄一个按钮Command1，加入以下代码，你试试看：
Private Sub Command1_Click()
Dim a As Long
Dim b As Long
a = Now - CDate("2014-1-1")'2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1")'2014年1月1日到2014年3月1日，共这么多天。
Print "2014年1月1日到今天，共" a "天。"
Print "2014年1月1日到2014年3月1日,共" b "天。"
End Sub
String tempStr = "ssssgoodssss";
int result = tempStr.indexOf("good");返回good在tempStr中的序号
如果result=-1说明不含有指定的字符串