在if语句的then后面只允许函数吗？

xiongmao86 · 发表于 2013-1-18 00:32

我在写代码的时候碰到这个问题，就是then后面老是出现“缺少： =”，是不是then后面只允许用function不允许用sub？
我的代码是这样的。

Private Declare Sub FetchPron Lib "SDdll" (ByRef mybytes() As Byte, ByRef mylen As Long)
Private Declare Sub FetchDef Lib "SDdll" (ByRef mybytes() As Byte, ByRef mylen As Long)
Private Declare Function Query Lib "SDdll" (ByVal myword As String) As Boolean
Sub test()
Dim s1 As String
Dim found As Boolean
Dim l As Long
s1 = StrConv("apple", vbUnicode)
found = Query(s1)
If True = found Then
FetchPron(Null, l)
End Sub

复制代码

xiongmao86 · 发表于 2013-1-18 18:33

不是，我知道要用一个end if，问题是，if true = found then后面我要是输入fetchpron（Null，l），vb就会出现一个提示说：“缺少 =",只有写成l = fetchpron(Null, l)才不会出现这个提示。这是为什么？

amesman · 发表于 2013-1-18 15:18

要么：If True = found Then FetchPron(Null, l)

要么：If True = found Then
FetchPron(Null, l)
end if

amesman · 发表于 2013-1-18 20:55

fetchpron有返回值，跟if语句没有关系。。。

xiongmao86 · 发表于 2013-1-18 22:35

本帖最后由 xiongmao86 于 2013-1-18 22:35 编辑

但是我的声明可是sub，而且调用的c语言函数也是我自己写的dll函数，里面也并没有返回值。

abiao · 发表于 2013-1-23 12:46

看来楼主是学C的，If True = found的习惯应该就是C那里来的。
楼主的问题是VB的语法问题：一个函数（内部或自定义）如果不需要返回值（即当语句用），那么是不需要括弧的，函数名后直接跟空格。所以FetchPron(Null, l)
应该改为：FetchPron Null, l
或者干脆当函数调用，随便给一个没用的变量赋值一下也行。
VB的方法调用也一样德性，没返回值的，一样不需要括弧。
（这一点，VB真的很讨厌，相同的函数调用方法，两种语法结构）

xiongmao86 · 发表于 2013-1-24 21:27

谢谢abiao，也谢谢amesman的热心回答。

原来是这样，真的从没有从这个方面去想过。

guobaojin · 发表于 2013-1-25 07:14

哎呀，东西都学杂了。

luhuman · 发表于 2016-12-17 12:05

受教了，原来老美也没有标准化代码

		自动登录	找回密码
密码			免费注册

[求助] 在if语句的then后面只允许函数吗？