![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VB6.0
csdn_dx
积土成山,风雨兴焉;积水成渊,蛟龙生焉;积善成德,而神明自得,圣心备焉。故不积跬步,无以至千里;不积小流,无以成江海.。骐骥一跃,不能十步;驽马十驾,功在不舍。锲而舍之,朽木不折;锲而不舍,金石可镂.蚓无爪牙之利,筋骨之强,上食埃土,下饮黄泉,用心一也。——《荀子劝学篇》
展开
-
VB编程总结
1.打包时可使用自带的Package & Deployment 向导生成安装包文件,会将所用到的控件提取。也可使用VB-PowerWrap软件进行生成exe,VB-PowerWrap中创建的时候,压缩建议使用低,在使用高的时候,其中有些控件在别的电脑运行时出现缺失问题。2.withWith MyLabel.Height = 2000.Width = 2000.Caption ...原创 2020-01-09 14:09:15 · 529 阅读 · 0 评论 -
vb6.0 api 实现鼠标指定位置 按下鼠标左键并抬起
例:单击Command1时鼠标会到(500,500)这个点作鼠标左键单击动作。 Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As L原创 2014-05-05 13:17:58 · 7139 阅读 · 0 评论 -
VB 串口打开无效端口
无效的端口打开应该提醒用户; Private Sub Command3_Click() If MSComm1.PortOpen = True Then MsgBox " 串口已经打开 ", , " 警告 " Else MSComm1.CommPort = Combo1.原创 2015-04-24 08:38:07 · 2424 阅读 · 0 评论