登录
首页 » VB源码 » VB6 获取当前打开窗口数量

VB6 获取当前打开窗口数量

于 2022-07-19 发布 文件大小:3.30 kB
0 133
下载积分: 2 下载次数: 1

代码说明:

VB6 获取当前打开窗口数量,如何获取当前打开窗口数量,本示例打开一个窗口后,在测试时会打开另外一个窗口,然后主窗口中会统计到这个打开的窗口,把当前打开窗口的数量填入文本框中。本程序可学习一下DoEvents()的用法。调用新窗口显示可参考以下代码:   Private Sub Command1_Click()    Form2.Show    Call Form_Activate   End Sub   Private Sub Form_Activate()    Text1.Text = DoEvents()   End Sub

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • vb.net 串口通讯测试项目
    vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。   运行后先检测测试需用的COM端口是否打开,弹出提示。   测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
    2023-02-14 09:00:03下载
    积分:1
  • VB.NET 获取全局鼠标坐标范例
    VB.NET 获取全局coordinate鼠标坐标,显示窗体内的XY坐标,窗体外凡是显示屏幕的任意位置都可以显示出坐标,获取全局鼠标坐标,测试截图是获取本窗口外的鼠标坐标,请参见截图效果。随着鼠标移动会显示出各个鼠标坐标点的XY坐标信息。单击窗口的“开始”按钮后,将执行以下代码获取全局坐标:   GetCursorPos(p)   tooltip1.SetToolTip(Me, "当前鼠标位置 X=:" & p.x & "Y=:" & p.y)   tooltip1.Active = True
    2022-11-10 13:15:03下载
    积分:1
  • 窗体分割 窗口分栏程序- vB版
    窗体分割 窗口分栏程序- vB版,这个可将窗口分为上下部分、左右部分,可分成二栏、三栏,通过程序左侧的参数设置面板,决定程序窗口要经过怎么的切割。本源码同样来自于国外源代码网站。代码注释英文,这里就不帖代码,你可以单击页面底部的“下载源码”按钮,下载本窗口切割实例的完整源码。
    2022-09-05 06:00:03下载
    积分:1
  • 一个使用Winsock控件的VB典型范例
    一个使用Winsock控件的VB典型范例,架构为CS结构,由服务端和客户端组成,两者都运行后,可互通消息。调试步骤:   1)打开服务器端的“工程1.dsw”工程   2)点击运行按钮。   1)打开客户端的“工程1.dsw”工程   2)点击运行按钮。   3)此时服务器端和客户端已经建立连接   4)在服务器和客户端分别输入任何内容,另一端将会收到该内容并显示出来。   说明:必须先运行服务器端工程,再运行客户端工程。
    2022-03-17 18:04:14下载
    积分:1
  • VB演示如何制作倒计时程序
    VB编写的倒计时程序,测试时,请输入目标日期与时间,格式如演示截图中所示,然后按下“倒计时”按钮,即可开始倒计时了,会显示出具体剩余的天数和时、分、秒。程序主要基于CDate函数和DateDiff函数来实现,主要代码如下:   Private Sub Timer1_Timer()    On Error GoTo H    Timer1.Interval = 1000    Dim i As Date    i = CDate(Text1)    Label1.Caption = "距离" & Text1 & "还剩" & DateDiff("d", Now, i) & "天" & CLng(DateDiff("h", Now, i)) Mod 24 & "小时" & CLng(DateDiff("n", Now, i)) Mod 60 & "分" & CLng(DateDiff("s", Now, i)) Mod 60 & " 秒"    Exit Sub   H:    MsgBox "请输入正确的时间"    Timer1.Enabled = False   End Sub
    2022-03-13 16:12:01下载
    积分:1
  • VB制作可移动按钮位置的Toolbar工具栏
    VB制作可移动按钮位置的工具栏,这个窗口中的Toolbar允许用户自己调整位置,可以拖动至指定位置,记得word中的工具栏就是这样,当你改变默认的工具栏布局时,程序会使用 MsgBox ("您确实要调整工具栏按钮的位置吗?")弹出确认信息。另外,本范例也可看作是一个在VB窗口中制作图标菜单的好范例,如示例图所示的效果。
    2022-11-01 12:50:03下载
    积分:1
  • 日常考勤程序 基于VB.NET实现附
    一款基于VB.NET和sqlserver数据库实现的考勤程序,实现公司员工的日常考勤功能,可实现指定日期的员工考勤,考勤时可选择考勤天数、考勤人,可查询本人的考勤记录,实现的是挺基本的考勤模块,还可显示当前用户的历史记录。   本实例的数据库文件在db文件夹下,请自行添加,并配置数据库信息。   源代码运行于VS2015环境下。
    2022-12-02 11:45:03下载
    积分:1
  • VB.NET API函数画线条示例
    VB.NET API函数示例,使用VB api函数画线条的一个例子,如图所示的效果中,鼠标单击两端,即可画出一条直线,主要是学习使用VB.NET中的API画图函数用法。示例运行效果请参见截图所示,本页提供该实例的源码下载。
    2022-03-22 10:44:12下载
    积分:1
  • vb6.0 字节数组和字符串的相互转换
    vb6.0 编程实现字节数组和字符串的相互转换,演示如何进行字节数组和字符串的相互转换.
    2023-03-14 07:50:04下载
    积分:1
  • VB.NET自制的看图工具软件
    VB.NET自制图片查看器,一个看图工具软件,功能方面主要有图片原图显示、自动缩放图片、图片居中、自动缩放图片框、背景色设置、文件名及其路径、视图ToolStripMenuItem等。你可以通过这个小程序了解一些VB.NET与图片之间的操作技巧,另外还可以学习到窗口对话框的一些基本操作、PictureBox控件用法、目录和文件列表框的使用、处理鼠标事件、偏移量计算图片位置,重画图片、绘图画面,颜色填充、窗体界面元素控制等的控制方法。。
    2022-12-25 17:15:03下载
    积分:1
  • 696518资源总数
  • 106182会员总数
  • 24今日下载