
vb
zixing
这个作者很懒,什么都没留下…
展开
-
注册热键
<br />OptionExplicit<br /><br />Private Declare Function RegisterHotKey Lib "user32" (ByVal hWnd AsLong, ByVal id AsLong, ByVal fsModifiers AsLong, ByVal vk AsLong) AsLong<br />Private Declare Function UnregisterHotKey Lib "user32" (ByVal hWnd AsLong, ByVa转载 2011-03-28 11:35:00 · 413 阅读 · 0 评论 -
资源
<br />近来写的不少文件都是用到系统的ocx文件,但是发现很多xp的精简系统中居然都没有这些ocx文件。搞得我的程序在许多人的机器上无法运行,这样我就找到如下的方法来解决这个问题。即:在exe文件中将ocx作为资源文件,外部有则不理,外部没有则自动生成。<br /> <br /> 做法是,将第三方控件以自定义资源文件方式保存在程序中,程序运行之后使用控件之前将所用到的控件生成到该程序目录下,完成控件从可执行文件中的金蝉脱壳。<br /> 具体做法如下:<br /> 第一步:将要用到的控件拷贝转载 2011-03-28 11:35:00 · 574 阅读 · 0 评论 -
注册热键
<br />OptionExplicit<br /><br />Private Declare Function RegisterHotKey Lib "user32" (ByVal hWnd AsLong, ByVal id AsLong, ByVal fsModifiers AsLong, ByVal vk AsLong) AsLong<br />Private Declare Function UnregisterHotKey Lib "user32" (ByVal hWnd AsLong, ByVa转载 2011-03-28 11:35:00 · 410 阅读 · 0 评论 -
判断点击了哪个按钮
<br />PrivateSub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click, Button1.Click<br /> IfDirectCast(sender, Button).Name.ToLower ="button1"Then<br /> MessageBox.Show("点了button1")<br /> Else<br />原创 2011-04-26 10:10:00 · 966 阅读 · 0 评论