社区
VB基础类
帖子详情
VB工程end时会触发什么 事件?
123BMW666
2004-02-10 01:47:17
VB工程end时会触发什么 事件?
...全文
49
21
打赏
收藏
VB工程end时会触发什么 事件?
VB工程end时会触发什么 事件?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
21 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
VB
测试键盘是被按下Shift键、Ctrl键等功能键.rar
VB
测试键盘功能键,判断键盘上的Shift键、Ctrl键、Alt键是否被按下过,主要是根据键盘的返回值来判断出按下了什么键,下面来细看代码: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) 'Print Shift If Shift = 1 Then '判断键盘
事件
中Shift 参数的返回值 Label1.Caption = "键盘上曾按下过Shift键" ElseIf Shift = 2 Then '根据返回值不同,可以判断出用户刚刚按下了什么功能键 Label1.Caption = "键盘上曾按下过Ctrl键" ElseIf Shift = 4 Then '把判断的结果显示出来 Label1.Caption = "键盘上曾按下过Alt键"
End
If
End
Sub 完整的可编译的源代码请单击下载链接下载。
vb
6.0定时运行程序(含程序和源代码)
vb
6.0制作。可以设定某程序到某一时间运行。但暂时只能添加单一程序。就是指运行时不能设定多个任务。但可以运行多个本程序。ps:后来又添加了一个回车
触发
添加的函数。但没有必要再上传了。把那个函数代码写在下面,只要放到代码段就Ok。Private Sub MaskEdBox1_KeyDown(KeyCode As Integer, Shift As Integer) ' 添加了一个回车
触发
事件
If KeyCode = 13 Then Call Command2_Click
End
If
End
Sub
VB
各种控件(个人收藏30多种,还有详细的使用介绍)
一、
VB
控件集,控件集内含ListView、漂亮按钮、下拉列表、TAB窗体选项卡、树形菜单控件、窗体滑动菜单、分组菜单,可折叠展开的菜单等。以前就更新过,现在修正了不少控件中的小错误,更接近完善了,相信这些控件对于从事
vb
6编程的朋友来说,是相当实用的。 二、1, clistbar.zip 超级的列表框,你一定不会失望(137KB) 2, axtree.zip 用惯了treeview控件的朋友可以试一试这款axtree控件,它增添了更多的控制(129KB) 3,richedit 利用RichText实现的编辑器,提供了修改字体,打印,查询等功能(4KB) 4,exptrocx.zip 实现explorer风格的树型目录的activex控件(1191KB) 5,txtsrch 在Text中实现快速增量查询(5KB) 6,exproplist.zip 建立一个如同
vb
里属性栏一样的东东,不仅形似,神也似(137KB) 7,combosrc.zip 在 COMBO 中的增量查询(2KB) 8,escombo.zip 为COomBo控件加强版,有近似关键字搜索功能(27KB) 9,sblist20.zip 它允许你用各自颜色(162KB) 10,wordwrap.zip 在 TextBox 中自动换行(2KB) 11,chklst.zip Check Box 和 List的结合体(101KB) 12,aresbuttonpro.zip aresbutton是一个显示图形按钮的activex控件, 主页地址http://const.ricor.ru/~art/aresbutton(320KB) 13,kenjLV1.zip ListView的API效果演示(11KB) 14,cbuttonr.zip 扩充的按钮控件(24KB) 15,csplitba.zip 在窗体里随意建立分隔条(11KB) 16,gbarocx.zip 进度条(171KB) 17,ccrpprg.zip 一个进度条的控件,可以有多种形态供你选择(142KB) 18,chklsb25.zip 它提供了类似 word 和 excel 中的内含检查框 ( checkbox)的列表框(listbox)。在这个控制中,每一个条目的字体、颜色、使能状态和选中状态都可以被单独设置。这个控制也支持3d外观、图片条目和定制的检查框符号(167KB) 19,as97ppup.zip 一种可以弹出的按钮,具有多种形态和功能(32KB) 20,slidrc.zip 形状类似于收音机音量控制的滚动条(296KB) 21,TracBar.zip 滚动条模块,与
VB
的滚动条比较, 该模块支持动态生成, 支持
触发
消息(7KB) 22,srchlist.zip 在 list 控件里进行增量查询(3KB) 23,devfltbt.zip 可爱的按钮(141KB) 24,treedrag.zip TreeView 中节点拖动、增加、删除等功能演示(8KB) 25,dirview.zip 装入整个 C 盘目录到 TreeView(5KB) 26,msghook.exe 专门用来截取Windows消息的控件(114KB) 27,led.ZIP 象电子表一样显示数字的控件(17KB) 28,splitbardemo.ZIP 无须任何代码,即可随意拖动该控件,有水平和垂直两种样式。支持 MouseOver
事件
(拖动结束)(11KB) 29,hotkeydemo.ZIP 该控件可以为你的应用程序添加一个系统级的热键,通过HotkeyPressed
事件
来处理热键的按下后的工作。(15KB) 30,pwdboxdemo.ZIP 每当用键盘输入一个字符时,将显示出随机个数的密码字符(31KB) 31,c5.zip 防火墙控件(39KB) 32,c6.zip 列出Windows运行的所有程序,并终止其运行的控件(18KB) 33,taskbar.zip 一个日期控件(有源代码)(6KB) 34,encrypt.zip 加密/解密字符串的控件(46KB) 35,activelock.zip
vb
.net单片机发送与接收
Private Sub Form1_Load(ByVal s
end
er As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load '载入窗体初始化 GetSerialPortNames() '将搜到的串口在下拉菜单中显示出来 AxMSComm1.InBufferSize = 1024 '接收缓冲区大小,此项无法在串口打开时进行设置 AxMSComm1.OutBufferSize = 1024 '发送缓冲区大小 ComboBox2.Text = "4800" ComboBox3.Text = "无校验" ComboBox4.Text = "8" ComboBox5.Text = "1" ChangePortProperty() '设置接收数据的格式为二进制 AxMSComm1.InputMode = MSCommLib.InputModeConstants.comInputModeBinary AxMSComm1.InputLen = 0 '设置从缓冲区读取全部数据 AxMSComm1.RThreshold = 1 '设置接收串口OnCommon
事件
,收到一个字符就
触发
AxMSComm1.PortOpen = True '打开串口 If AxMSComm1.PortOpen = True Then OvalShape1.FillColor = Color.Green 'OvalShape颜色设为绿色 Button1.Text = "关闭端口" '按钮上的文字显示为关闭端口 Else OvalShape1.FillColor = Color.Red 'OvalShape颜色设为红色 Button1.Text = "打开端口" '按钮上的文字显示为打开端口
End
If
End
Sub
VB
文件夹浏览器.rar
VB
文件夹浏览器,单击按钮,在文件夹浏览器中选择相应的文件夹,实现文件夹浏览和文件浏览,调用系统的文件夹浏览组件。单击窗体上的按钮后,将
触发
以下脚本: Private Sub Command1_Click() Text1.Text = FPath$(Me.hWnd, "文件夹浏览器")
End
Sub
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章