主题:[讨论]请教
thisform.Command1.TabStop=.F.
a=LOWER(this.Value)
IF a="abcd"
thisform.Label1.Top
thisform.Label1.Caption="欢迎使用本程序!"
thisform.Command1.TabStop=.T.
this.Parent.Visible=.F.
ELSE
MESSAGEBOX("对不起,口令错!请重新输入!",48,"口令")
this.SelStart=0
this.SelLength=LEN(RTRIM(this.Value))
ENDIF
我这个编程代码运行时候出现说 “ MESSAGEBOX("对不起,口令错!请重新输入!",48,"口令")”
“[color=FF0000]函数名缺少)。”[/color]
是怎么回事的,请高手指点一下,多谢了
a=LOWER(this.Value)
IF a="abcd"
thisform.Label1.Top
thisform.Label1.Caption="欢迎使用本程序!"
thisform.Command1.TabStop=.T.
this.Parent.Visible=.F.
ELSE
MESSAGEBOX("对不起,口令错!请重新输入!",48,"口令")
this.SelStart=0
this.SelLength=LEN(RTRIM(this.Value))
ENDIF
我这个编程代码运行时候出现说 “ MESSAGEBOX("对不起,口令错!请重新输入!",48,"口令")”
“[color=FF0000]函数名缺少)。”[/color]
是怎么回事的,请高手指点一下,多谢了