Null, Empty, Nothing, and vbNullString的区别

最新推荐文章于 2023-02-14 13:09:44 发布
最新推荐文章于 2023-02-14 13:09:44 发布
阅读量1.6k 收藏 1
点赞数 2
分类专栏： 应用积累
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/u010892841/article/details/18661129
版权

相信大家在做系统的时候会经常遇到null、empty、nothing、vbnullstring这一类变量，他们有很大的相似性，以至于我们在选择的时候会有些混乱。据此，通过整理有关资料在这里把这些变量的区别总结一下，有哪里不完善的欢迎提出。
Null：Null是一个象Integer或者String一样的变量类型，它表示一个没有合法数据的变量。这有别于zero、Nothing、Empty或者vbNullString。许多数值与Null结合在一起，都将产生Null结果。比如：   表达式 结果  Null - Null Null  Null + 7 7  Null = Null Null   你可以使用IsNull语句来判断表达式是否为Null：   If IsNull(my_variable) Then ...  
Empty：这也是一个象Integer或者String一样的变量类型，它表示了一个还没有进行初始化的变量。它与Null的意义不同，Null表示没有合法数据。   一个没有初始化的变量的数值是Empty。你可以使用IsEmpty语句来判断是否变量进行了初始化：   If IsEmpty(my_variant) Then ...  
Nothing：这是一个指向空对象的对象引用。将对象引用设置为Nothing，就释放了那个对象。如果没有其他的引用指向对象，Visual Basic就将销毁这个对象。   Dim obj As Form1  :  Set obj = Nothing 注释： Free the object reference.   使用Is Nothing语句来判断是否一个引用为Nothing：   If obj Is Nothing Then ...  
vbNullString：这是个常量，表示一个empty字符串。它与空白字符串""不同，表示什么也没有的字符串（nothing string）。对于许多场合，它被当作一个empty字符串""处理，真正使用它的目的是传递null参数给库函数。  判断字符串是否为空白   
有以下几种方法判断一个字符串是否为空白：   Dim txt As String  Dim blank As String   blank = ""  :  If Len(txt) = 0 Then ...  If txt = vbNullString Then ...  If txt = "" Then ...  If txt = blank Then ...   经过测试，Len(txt)=0的方法要比其他方法快20％多


code farmer mqp
关注
专栏目录
检查记录集的的栏位是否是null值 CheckNull
01-27
CheckNull = IIf(IsNull(Filed), vbNullString, Filed) End Function ``` - **函数定义**：该函数被声明为`Public`，意味着它可以在模块之外被调用。 - **参数说明**：`File`作为函数的输入参数，类型为`ADODB....
探究Null、Empty、VbNullstring、Nothing的异同
weixin_30607029的博客
09-08 174
最近在做机房收费系统的时候，遇到这样一句代码。其实之前也遇到过，但是没有仔细去琢磨。这一琢磨不要紧，一琢磨问题就出来了。 Text1.text=”” 和这样一句代码text1.text=vbnullstring开始的时候没有仔细去想，当成是同样的意思，其实不是的。这样就牵出了null、empty、vbnullstring、nothing、“”等一系列看起来很神似的符号，...
辨析Visual Basic中的Empty、Null和Nothing关键字
billj的专栏
10-24 2540
辨析Empty，Null和Nothing在VBA中变量一般都是强类型的，即总声明成Integer，Long，Single，Double，String或Date等类型，这些强类型的值毋需考虑Empty、Null和Nothing。有时我们需要定义一种能包含所有类型的变量，这种类型就是Variant，它是一种特殊的数据类型，可以包含数值、字符串或日期数据，还包含自定义类型、对象（Object）和
Java vbnullstring_VB中Null、Empty、Nothing及vbNullString的区别
weixin_29046611的博客
02-16 219
Null：Null是一个象Integer或者String一样的变量类型，它表示一个没有合法数据的变量。这有别于zero、Nothing、Empty或者vbNullString。可以使用IsNull语句来判断表达式是否为Null：If IsNull(my_variable) Then ...Empty：这也是一个象Integer或者String一样的变量类型，它表示了一个还没有进行初始化的变量。它与...
VB中判断空的几种方法,Null, Missing, Empty, Nothing, vbNullString区别
热门推荐
devops
04-07 1万+
  vb6中存在几个虚幻的值：Null、Missing、Empty、Nothing、vbNullString。除了最后一个之外，每一个值都不能直接用“a=值”来判断。下面分别解释一下这几个值的含义。 1、Null Null指一个不合法的数据，判断一个变量是否为Null使用isNull函数。 这种数据通常出现在三种情况下： (1)最简单的，函数直接返回Null给调用方。譬如 Function ...
Java vbnullstring_VB中判断空的几种方法,Null, Missing, Empty, Nothing, vbNullString区别
weixin_30707165的博客
02-24 591
vb6中存在几个虚幻的值：Null、Missing、Empty、Nothing、vbNullString。除了最后一个之外，每一个值都不能直接用“a=值”来判断。下面分别解释一下这几个值的含义。1、Null。Null指一个不合法的数据，判断一个变量是否为Null使用isNull函数。这种数据通常出现在三种情况下：(1)最简单的，函数直接返回Null给调用方。譬如Function DivideEx(...
精彩编程与编程技巧-VB编程步步高－杂类篇（二）...
10-10
本文介绍了Visual Basic编程中的几个核心概念：`Null`、`Empty`、`Nothing` 和 `vbNullString`，以及它们之间的区别。正确理解和应用这些概念有助于编写出更加健壮和高效的程序。此外，还提供了一个实用的函数示例，...
Chucks_VBA_Reference_rev17.docx
04-07
Instructions on using `vbNullString` to handle empty strings efficiently. **Ignoring Excel Errors (Green Corners in Cells) (Page 17)** Techniques for handling errors that cause green corners in ...
将字符串传递到 DLL 过程
01-02
未初始化的String变量以NULL传递，而不是空字符串，如果你想要明确地传递NULL，可以使用vbNullString常数。 对于那些专门设计为使用Automation数据类型（如BSTR）的DLL，VB可以直接以ByRef方式传递String参数，因为...
上位机与USB设备通信
08-21
deviceInfoSet = SetupDiGetClassDevs(vbNullGuid, vbNullString, 0, DIGCF_PRESENT Or DIGCF_DEVICEINTERFACE) ' 如果成功，则枚举设备接口 If deviceInfoSet <> INVALID_HANDLE_VALUE Then Dim ...
C#中string.Empty和null的区别详解
09-03
主要介绍了C#中string.Empty和null的区别详解,本文同时讲解了空字符串和Empty的区别以及string.Empty与null的区别,需要的朋友可以参考下
空字符串和null有什么区别
weixin_35749440的博客
02-14 2217
空字符串和 null 有很大的区别。 空字符串是一个长度为 0 的字符串，它是一个有效的字符串，代表着没有任何内容。 而 null 则表示没有任何值，不是一个有效的字符串，也不代表任何意义。它指向了一个不存在的对象或者变量。 因此，在代码中，空字符串和 null 的用途和处理方式是不同的。使用空字符串需要特殊注意，以避免对程序造成影响。 ...
Null, Missing, Empty, Nothing, vbNullString的区别
人生代码，代码人生。。。
01-25 1151
vb6中存在几个虚幻的值：Null、Missing、Empty、Nothing、vbNullString。除了最后一个之外，每一个值都不能直接用“a=值”来判断。下面分别解释一下这几个值的含义。 1、Null。 Null指一个不合法的数据，判断一个变量是否为Null使用isNull函数。 这种数据通常出现在三种情况下： (1)最简单的，函数直接返回Null给调用方。譬如 Function
vb6中判断一个变量值是否为空
qq_40621901的博客
09-17 4678
vb6中存在几个虚幻的值：Null、Missing、Empty、Nothing、vbNullString。除了最后一个之外，每一个值都不能直接用“a=值”来判断。下面分别解释一下这几个值的含义。 1、Null。 Null指一个不合法的数据，判断一个变量是否为Null使用isNull函数。 这种数据通常出现在三种情况下： (1)最简单的，函数直接返回Null给调用方。譬如 Function DivideEx(ByVal A as Double, ByVal B as Double) as Double If
VB中Null、Empty、Nothing及vbNullString的区别
weixin_30593443的博客
07-10 165
Null：Null是一个象Integer或者String一样的变量类型，它表示一个没有合法数据的变量。这有别于zero、Nothing、Empty或者vbNullString。 　可以使用IsNull语句来判断表达式是否为Null： If IsNull(my_variable) Then ... 　Empty：这也是一个象Integer或者String一样的变量类...
Java vbnullstring_这个贴吧里用vbNullString这个常量的有多少？
weixin_39929683的博客
02-24 81
该楼层疑似违规已被系统折叠隐藏此楼查看此楼刚刚全面的了解了一下，给大家分享Null, Empty, Nothing, and vbNullString的区别以上这些奇怪的数值间有些微妙的不同含义：Null：Null是一个象Integer或者String一样的变量类型，它表示一个没有合法数据的变量。这有别于zero、Nothing、Empty或者vbNullString。许多数值与Null结合在一...
修改下列代码：错误：类型不匹配：Private Declare Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, lParam As Long) As Long Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExW" (ByVal hWndParent As Long, ByVal hWndChildAfter As Long, ByVal lpClassName As Long, ByVal lpWindowName As Long) As Long Private Declare Function GetClassName Lib "user32" Alias "GetClassNameW" (ByVal hWnd As Long, ByVal lpClassName As Long, ByVal nMaxCount As Long) As Long Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextW" (ByVal hWnd As Long, ByVal lpWindowText As Long, ByVal nMaxCount As Long) As Long Private Const WM_APPCOMMAND As Long = &H319 Private Const APPCOMMAND_VOLUME_UP As Long = &HA Private Const APPCOMMAND_VOLUME_DOWN As Long = &H9 Private Const APPCOMMAND_VOLUME_MUTE As Long = &H8 Public Sub SetSystemVolume(ByVal level As Integer) Dim hWndTaskbar As Long Dim hWndVolumeCtrl As Long Dim hWndParent As Long Dim hWndChild As Long Dim className As String hWndTaskbar = FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString) If hWndTaskbar = 0 Then Exit Sub hWndVolumeCtrl = FindWindowEx(hWndTaskbar, 0, "TrayNotifyWnd", vbNullString) If hWndVolumeCtrl = 0 Then Exit Sub hWndParent = FindWindowEx(hWndVolumeCtrl, 0, "SysPager", vbNullString) If hWndParent = 0 Then Exit Sub hWndChild = FindWindowEx(hWndParent, 0, "ToolbarWindow32", vbNullString) If hWndChild = 0 Then Exit Sub ' get class name of the volume control className = Space(256) GetClassName hWndChild, StrPtr(className), Len(className) className = Left$(className, InStr(className, vbNullChar) - 1) ' find the volume control by window title hWndChild = FindWindowEx(hWndChild, 0, className, "Volume") If hWndChild = 0 Then Exit Sub SendMessage hWndChild, WM_APPCOMMAND, 0, APPCOMMAND_VOLUME_UP * &H10000 + level End Sub Public Sub MuteSystemVolume() Dim hWndTaskbar As Long Dim hWndVolumeCtrl As Long Dim hWndParent As Long Dim hWndChild As Long Dim className As String hWndTaskbar = FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString) If hWndTaskbar = 0 Then Exit Sub hWndVolumeCtrl = FindWindowEx(hWndTaskbar, 0, "TrayNotifyWnd", vbNullString) If hWndVolumeCtrl = 0 Then Exit Sub hWndParent = FindWindowEx(hWndVolumeCtrl, 0, "SysPager", vbNullString) If hWndParent = 0 Then Exit Sub hWndChild = FindWindowEx(hWndParent, 0, "ToolbarWindow32", vbNullString) If hWndChild = 0 Then Exit Sub ' get class name of the volume control className = Space(256) GetClassName hWndChild, StrPtr(className), Len(className) className = Left$(className, InStr(className, vbNullChar) - 1) ' find the volume control by window title hWndChild = FindWindowEx(hWndChild, 0, className, "Volume") If hWndChild = 0 Then Exit Sub SendMessage hWndChild, WM_APPCOMMAND, 0, APPCOMMAND_VOLUME_MUTE * &H10000 End Sub Private Sub Command1_Click() MuteSystemVolume End Sub
最新发布
05-11
hWndVolumeCtrl = FindWindowEx(hWndTaskbar, 0, "TrayNotifyWnd", vbNullString) If hWndVolumeCtrl = 0 Then Exit Sub hWndParent = FindWindowEx(hWndVolumeCtrl, 0, "SysPager", vbNullString) If ...
评论 34
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值