易截截图软件、单文件、免安装、纯绿色、仅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 / 控件

为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了

大胡子真厉害,回答基本都是爆料级的
大胡子升级真快啊,这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。

回复 ......

vb - VB / 基础类

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

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

vb - VB / 非技术类

怎么把已知的数据保存成xml文件,现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vb 中 - VB / 基础类

dim a as string,b as string,c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串,而不存在c字符串

看看i ......

求助:C代码改写成VB代码 - VB / 基础类

谁能帮我把下面这些代码改成VB形式的,多谢了,急用~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号