释放对象变量:
Dim s as Object
方法:
Set s = Nothing
数组变量:
dim arr(10) as integer
方法:
Erase arr
如果是过程级变量,所有变量将随着过程结束自动释放!
strSql = "select 密码 from [管理员信息表] where 用户名=" & Trim(txtName) & ""表达式写错了,改为
strSql = "select 密码 from 管理员信息表 where 用户名='" & Trim(txtName) & "'"应该可以了
选择语句最容易出错的就是表达式里有变量,要用单引号引起来,单引号是字符,又需要双引号引起来,呵呵,你再试试吧。
是不是批量处理啊是的话下面有例子给你,但不可以删除WINDOWS所有释放文件,只能删除指定文件夹的释放文件,思路要你自己想了,兄弟
Private Sub Command1_Click()
Set fso = CreateObject("scriptingfilesystemobject") '定义fso
b = Text1Text '输入文件夹路径
Set a = fsogetfolder(b) '定义a
For Each i In aFiles
If LCase(ishortname) Like "exe" Then '这里可以把EXE改为你释放文件的扩展名
fsodeletefile ishortpath
End If
Next
End Sub
能做的就那么多了不明白可以加我QQ 375169120
以上就是关于VB 如何释放变量全部的内容,包括:VB 如何释放变量、在运行vb程序时提示对象名无效代码如下:总是在 .Open strSql变成黄色的,急!!救助!!!、VB如何删除释放文件等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)