asp调用函数方法问题。如何获取函数中的参数。函数如下 10
'验证表单是否为空,格式为:"表单名1,表单名2,表单3".如果为空,警告并返回PublicSubCheckFormIsEmpty(strSplit)dimaForm,i...
'验证表单是否为空,格式为:"表单名1,表单名2,表单3".如果为空,警告并返回
Public Sub CheckFormIsEmpty(strSplit)
dim aForm,i
aForm=split(strSplit,",")
for each i in aForm
if Request(i)="" then
Call WrongAlert("请填写完整!")
end if
next
End Sub
然后调用这个方法要怎么调呢?其中strSplit具体该怎么定义?该怎么调用这个方法呢 展开
Public Sub CheckFormIsEmpty(strSplit)
dim aForm,i
aForm=split(strSplit,",")
for each i in aForm
if Request(i)="" then
Call WrongAlert("请填写完整!")
end if
next
End Sub
然后调用这个方法要怎么调呢?其中strSplit具体该怎么定义?该怎么调用这个方法呢 展开
1个回答
2015-07-24
展开全部
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close savechanges:=False
End Sub
亲 只需要在workbook 的BeforeClose 事件里面写上我上面这句ThisWorkbook.Close savechanges:=False就行哦 但是你所做的更更都不会保存哦,如果你想又保存且还不提示的话你要在之前就写一下保存的代码就象这样
thisworkbook.save
ThisWorkbook.Close savechanges:=False
ThisWorkbook.Close savechanges:=False
End Sub
亲 只需要在workbook 的BeforeClose 事件里面写上我上面这句ThisWorkbook.Close savechanges:=False就行哦 但是你所做的更更都不会保存哦,如果你想又保存且还不提示的话你要在之前就写一下保存的代码就象这样
thisworkbook.save
ThisWorkbook.Close savechanges:=False
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询