小编Bob*_*b77的帖子

如何使用vba获得power point slide尺寸?

我正在做一个项目.其中我想找出"我的文本框是否已经滑出幻灯片?" .如果是,则显示错误消息.

所以我的逻辑是,如果我找到幻灯片的尺寸,那么我将在IF中使用它...其他条件如:

If textbox_position < slide_dimension  then
#Error
end if
Run Code Online (Sandbox Code Playgroud)

如果您有任何其他想法,请告诉我.

谢谢

powerpoint vba powerpoint-vba

9
推荐指数
1
解决办法
2万
查看次数

VBS:终止多个正在运行的应用程序

我试图使用以下VBS脚本同时关闭多个应用程序,但我0x80041017For Each循环线上得到错误.它只使用一个应用程序,但我添加了另一个应用程序终止

strComputer = "."
strProcessToKill1 = "Acrobat.exe" 
strProcessToKill2 = "iexplore.exe" 

Set objWMIService = GetObject("winmgmts:" _
                & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 

Set colProcess = objWMIService.ExecQuery _
                ("Select * from Win32_Process Where Name = '" & strProcessToKill1 & "' or '" & strProcessToKill2 & "'")


count = 0
For Each objProcess in colProcess
                objProcess.Terminate()
                count = count + 1
Next 
Run Code Online (Sandbox Code Playgroud)

vbscript vba

1
推荐指数
1
解决办法
2317
查看次数

在经典的asp中使用记录集

我正在尝试使用记录集从数据库中获取数据,并使用经典ASP中的以下代码.我正在使用Windows 7 32位操作系统:

<%
dim con,rs
set con=Server.Createobject("ADODB.Connection")
con.Provider="Microsoft.Jet.OLEDB.4.0"
con.Open "c:\inetpub\wwwroot\New folder\123.mdb"
rs.Open "select * from student",con
for each x in rs.fields
response.write(x.name)
response.write("=")
response.write(x.value)
next
rs.Close
con.Close
%>
Run Code Online (Sandbox Code Playgroud)

错误是:

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/New folder/recordset.asp, line 7
Run Code Online (Sandbox Code Playgroud)

recordset asp-classic

1
推荐指数
1
解决办法
2万
查看次数

需要将VB 6表单转换为Html表单

我们使用visual basic 6开发了一个独立的应用程序.现在我们将独立应用程序更改为Web应用程序.有没有办法将VB6表单转换为纯HTML表单,以便我的工作将减少很多.请提出你的建议.

编辑:我是VB6和.net技术的新手

html forms vb6 vb6-migration

0
推荐指数
1
解决办法
3683
查看次数