Office中国论坛/Access中国论坛

标题: 奇了，怪了。。请各位帮我看看小问题 [打印本页]

作者: kunlun 时间: 2005-3-25 00:34
标题: 奇了，怪了。。请各位帮我看看小问题
<IMG src="">

大家看看，我明明写了。为什么说我没有写呢？<IMG>

[此贴子已经被作者于2005-3-24 16:35:43编辑过]

作者: kunlun 时间: 2005-3-25 00:38
Private Sub Command15_Click()

If Me.Text13 = Me.英文 Then Me.是否新单词 = False

Else

MsgBox "你输入的英文不正确，请重新输入"

End If

End Sub

这段代码在运行的提示 else没有 if 为什么呀，谁知道的告诉我好吗？

作者: sgrshh29 时间: 2005-3-25 00:44
好像应是：

If Me.Text13 = Me.英文 Then

Me.是否新单词 = False

Else

MsgBox "你输入的英文不正确，请重新输入"

End If

End Sub

作者: kunlun 时间: 2005-3-25 18:39

以下是引用sgrshh29在2005-3-24 16:44:24的发言：

好像应是：

If Me.Text13 = Me.英文 Then

Me.是否新单词 = False

Else

MsgBox "你输入的英文不正确，请重新输入"

End If

End Sub

区别在哪儿？请楼上的明言好吗？

作者: 情比金坚 时间: 2005-3-25 22:04

以下是引用kunlun在2005-3-25 10:39:01的发言：

if 你没有回复 then

msgbox"如果你真的没有什么东西可写，请你签个名总可以吧"

end if

如果你要在Then 后面写什么Else EndIf 的，Then后面就必须回行。

[此贴子已经被作者于2005-3-25 14:06:10编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)