vb.net鼠标双击 vbs自动点击鼠标
vb.net如何调用打开外部excel文档
第一步,新建项目。
创新互联建站拥有10余年成都网站建设工作经验,为各大企业提供网站设计制作、成都网站设计服务,对于网页设计、PC网站建设(电脑版网站建设)、重庆APP开发公司、wap网站建设(手机版网站建设)、程序开发、网站优化(SEO优化)、微网站、域名注册等,凭借多年来在互联网的打拼,我们在互联网网站建设行业积累了很多网站制作、网站设计、网络营销经验,集策划、开发、设计、营销、管理等网站化运作于一体,具备承接各种规模类型的网站建设项目的能力。
1
打开vb.net,也就是打开Microsoft visual studio 2010,第一次使用的时候设置为basic语言就行。新建项目--打开excel。
2
新建成功。
END
第二步,添加引用。
1
“项目”--“添加引用”。
2
添加Microsoft Excel 14.0 Object Library。
END
第三步,添加打开文件对话框工具。
1
工具箱--对话框--openfiledialog。
2
添加成功。
END
第四步,添加命令按钮控件。
1
工具箱--公共控件--button。
在控件上右击鼠标,进入属性设置。
2
text属性设置为“打开excel”。
3
name属性也设置为“打开excel”。
END
第五步,编写程序。
1
鼠标双击命令按钮,进入编程界面,编写程序。
END
第六步,运行程序。
1
鼠标单击启动调式图标,程序开始运行。
2
单击打开excel命令按钮,调用打开文件对话框,选择自己要打开的excel文件。
END
第七步,保存程序。
第一次程序运行完,关闭程序,出现关闭项目提示,选择保存。
2
选好自己要保存的位置。
VB.net如何双击文件打开
我不知道我的理解是否正确,不过你先看看吧
以图片为例,我的桌面有一个 例图.jpg 的文件,我自己写的程序 图片浏览器.exe
将图片的启动程序修改成 图片浏览器.exe
图片浏览器.exe 打开 例图.jpg 文件
解决方案如下,利用了 System.Environment.GetCommandLineArgs()函数
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim MyFile As String = "" '用以保存所打开的文件路径
Dim Parameters() As String '用以保存数组参数
Dim i As Integer
Parameters= System.Environment.GetCommandLineArgs()
i = Parameters.GetUpperBound(0)
If i 0 Then
MyFileName = Parameters(1)
PictureBox1.ImageLocation = MyFileName
End If
End Sub
参考文件:MSDN
原创程序哦
如何在VB.net中用程序控制鼠标移动和点击
调用api
在Visual Baisc.net中的声明:
Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Const MOUSEEVENTF_LEFTDOWN = H2 '模拟鼠标左键按下
Public Const MOUSEEVENTF_LEFTUP = H4 ’模拟鼠标左键释放
Public Const MOUSEEVENTF_MIDDLEDOWN = H20 '模拟鼠标中间键按下
Public Const MOUSEEVENTF_MIDDLEUP = H40 '模拟鼠标中间键释放
Public Const MOUSEEVENTF_RIGHTDOWN = H8 '模拟鼠标右键按下
Public Const MOUSEEVENTF_RIGHTUP = H10 '模拟鼠标右键释放
Public Const MOUSEEVENTF_MOVE = H1 '模拟鼠标指针移动
例:
mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0
'在(10,10)模拟鼠标左键按下
vb.net mouse_event被屏蔽怎么模拟鼠标双击
软糖来回答一下。
利用驱动级鼠标键盘按键模拟。
找一下winIO64。很多博客都写清了详细用法,需要研究一下。
PS:这个东西会被各大网游当外G的,使用请小心。
跪求大神指点, vb.net 的图片鼠标事件 怎么把鼠标单击双击和鼠标按下鼠标放开 分辨出来呢?
单击双击和按下松开本身就是重合的操作,分不开的,你想达到什么样的操作目的?
VB.NET模拟鼠标问题
Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Integer, ByVal dx As Integer, ByVal dy As Integer, ByVal cButtons As Integer, ByVal dwExtraInfo As Integer)
Dim postion1 As New Point
mouse_event(H1 Or H8000, postion1.X * 65535 / 1366, postion1.Y * 65535 / 768, 0, 0)
'按绝对位置移动鼠标
'在鼠标坐标系统中,屏幕在水平和垂直方向上均匀分割成65535×65535个单元,
'当前所用显示屏分辨率为1366*768
'所以要进行如上转换
mouse_event(H2, 0, 0, 0, 0) '鼠标左键按下
mouse_event(H4, 0, 0, 0, 0) '鼠标左键弹起
msdn上有 mouse_event 的详解,大致使用如上
文章标题:vb.net鼠标双击 vbs自动点击鼠标
标题链接:http://azwzsj.com/article/hjjopd.html