易截截图软件、单文件、免安装、纯绿色、仅160KB

求教一个vb的语法问题 - VB / 基础类

求教一个vb的语法问题:下面是一个验证用户密码的函数,谁能告诉我这个语句是什么意思“PassIsTrue = (Rs(0).Value = 1)”,难道是vb中if判断简化写法?

''''''''''''''''''''''''''
Public Function PassIsTrue(ByVal strUname As String, ByVal strPass As String, Optional ByVal strTable As String = "Users") As Boolean
  Dim Rs As Recordset
  Set Rs = g_Conn.Execute("SELECT COUNT(*) from " & strTable & " Where UserName='" & strUname & "' and Upass='" & strPass & "'")
  PassIsTrue = (Rs(0).Value = 1)
  Set Rs = Nothing
End Function
Rs(0).Value = 1 返回一个布尔表达式 true or false 
然后赋值给PassIsTrue 



PassIsTrue = (Rs(0).Value = 1

返回一个布尔值 TRUE or FALSE ! (真假两个值)

if 判断语句的返回结果类似它 条件要么成立,要么不成立(也是两个值)

ok,原来()内是个关系表达式,谢谢楼上二位了!!!!


相关问答:

vb - VB / 基础类

数据库里有一个字段的内容是二进制,怎么才能把这个二进制读出来
使用字节流对象可以实现

例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb生成EXE - VB / 基础类

form1中有text1-8, 和command1 
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......

中山的VB程序员进来看一下 - VB / 非技术类

刚建了一个群:中山VB编程(105787219)
有在中山及中山周边的程序员请加入.大家一起探讨问题.合作项目.
尽管俺不是中山的,也进来蹭分……

佛山的行吗,广州的行吗?

友情支持
回复内容太短了! 

帮顶 ......

vb WebBrowser 小问题,请教 - VB / 基础类

vb WebBrowser 小问题,请教:
WebBrowser里的网址跳转后,怎么取得跳转后的页面的URL地址

顶下顶下

引用
BeforeNavigate2
好像没有这个吧 vb6.0

BeforeNavigate2
这个可以有,呵呵。
......

关于Vb中sql语句的写法(100分) - Java / Web 开发

求个vb中的sql语句的写法,次sql语句的用法是分页程序
我写的如下:其中A是用来接收每页显示的记录的条数,B是用来接收显示的当前的页面.
sqltext="select top A * from log where id not in(select top ( ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号