在VB中想用变量n记录单击按钮的次数。词句应怎么写

Dim N As Integer

Private Sub Command1_Click()

N = N + 1

End Sub

Private Sub Command2_Click()

MsgBox "共点了" + CStr(N) + "次"

N = 0

End Sub

你不要简单地检测GetAsyncKeyState的返回值是否非零，因为如果在这个函数运行前指定的键已经被按过，则这个函数的返回值的位0为1；如果这个键目前处于按下状态，则位15为1。所以你检测位15是否为1就可以知道这个键是曾经被按过还是正在被按着：

If(GetAsyncKeyState(VK_SPACE)And &H8000) = &H8000Then Call 事件A

在 form_click 里写代码

Static dd As Integer

dd = dd + 1

text1 = "您点击了：" & dd & "次"

你这个按钮点击后，页面是要刷新的是吧？那么你要在WebBrowser1控件的DocumentComplete事件中编写代码继续点击。如果在同一页面连续点击多次，那么起作用的肯定只有一次，因为页面都还没刷新呢，点了有P用啊！写这类程序要多用事件驱动模式，因为网络环境很复杂，不用事件驱动的话，程序靠瞎蒙是很难知道网页什么时候开始刷新、什么时候刷新完毕、什么时候跳转，诸如此类的。

Dim i As Integer,在这里声明的是全局变量，就是说，只要程序在运行，这个变量就一直有效

Private Sub Form_Click()

i = i + 1

Text1Text = i

End Sub

Private Sub Form_Click()

Dim i As Integer这里声明变量，只存活在本过程，过程结束，变量就无效了，而每点一次窗体，次过程就会重新执行一下，所以 i就一直是初始值+1，而i 原本没有赋给初始值，所以默认为0，

i = i + 1

Text1Text = i

End Sub

因为你定义的单击是

Form_Click()

，含义就是窗口单击，当然只能监控窗口内的，要监视窗口外的，要调用API函数。

1、用SetCapture捕捉了鼠标事件。

VB声明

Declare

Function

SetCapture

Lib

"user32"

Alias

"SetCapture"

(ByVal

hwnd

As

Long)

As

Long

说明

将鼠标捕获设置到指定的窗口。在鼠标按钮按下的时候，这个窗口会为当前应用程序或整个系统接收所有鼠标输入

返回值

Long，之前拥有鼠标捕获的窗口的句柄

参数表

参数

类型及说明

hwnd

Long，要接收所有鼠标输入的窗口的句柄，与ReleaseCapture函数一起使用。

2、判断鼠标事件是否为WM_LBUTTONDBLCLK。

以上就是关于在VB中想用变量n记录单击按钮的次数。词句应怎么写全部的内容，包括:在VB中想用变量n记录单击按钮的次数。词句应怎么写、vb中如何才能用GetAsyncKeyState函数判断某个键按下了几次、vb初学问题 统计鼠标单击该窗体上的次数等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！