如题!代码执行通过!
解决方案 »
- 寻求 更新、删除、添加数据库代码。分全压了
- 为什么模块里面的函数在窗口里面调用可以,但是在Class modules里面却调用不成功?
- ActiveReport写入Excel
- csdn论坛vb版网友的一大特点,郁闷est.
- 求助EnumMonitors的使用方法!!!
- VB中的单位和毫米之间的关系,谢谢!
- 求救!!为什么我在调用.DLL时,系统总提示"无法找到.DLL文件的入口"。加分了!!
- 请问在win2000和nt中如何关机而有不会出现“现在可以关机的信息”直接断电源?谢了问题解决了会加分.
- VB借助阿里云服务器实现UDP穿透
- VB读取XML文件中的值,并修改指定值,并保存
- 关于连接查询如何分组的问题
- 高分求助动态生成控件和卸载空间
Dim MyArr() As String
Dim str As String str = "任意字符或空"
str = str & Join(MyArr, "任意字符或空")
If Len(str) = Len("任意字符或空") Then
MsgBox "你还没有赋值..."
End If
MsgBox "你还没有赋值..."
End If
判断字符串是否为空字符串,用 LenB(s) = 0 就可以了。