找答案的高端用户(找答案钻石及双钻级别的用户)将尽可能从此问题下的所有回
答中,为您推荐最佳答案。届时您可以根据推荐数采纳答案。
如果自提问时间起7天内您仍无法选出最佳答案,您可以选择“无满意答案”关闭此问题。
{{itemCategory}}
手机扫码追踪该问题,
觉得实用,立即去分享!
点击复制链接
wincc怎么查看一个文件?!
可以用改文件的应用程序打开,比如用记事本打开txt
Dim objShell,filePath
Set objShell = CreateObject("WScript.Shell")
filePath = "C:\file.txt"
objShell.Run "notepad.exe " & filePath
Set objShell = Nothing
'打开对话框
Dim oExcel,FileDialog
Set oExcel = CreateObject("Excel.Application")
Set FileDialog = oExcel.FileDialog(msoFileDialogFilePicker)
'添加筛选条件
FileDialog.Filters.Add "Images", "*.gif; *.jpg; *.jpeg", 1
'设置初始路径
FileDialog.InitialFileName = "D:\"
'弹出对话框
FileDialog.show()
' 输出选中的文件路径
Dim File_Selected
File_Selected = FileDialog.SelectedItems(1)
HMIRuntime.Trace "选择的文件:" & File_Selected & vbCrLf
End Sub
如果没有选择文件(单击对话框上的"取消"按钮),程序会报错。
首次回答问题,获得
双倍西币积分!
立即成为技术知识分享的一员!
欢迎您访问支持中心!
丰富的视频,全方位的文档,大量的网友交流精华……
为了更好的完善这些内容,我们诚邀您在浏览结束后,花20秒左右的时间,完成一个用户在线调查!
感谢您的支持!