PB入门教程A(9)

PB入门教程A

proc

IF EOF(1) GOTO GotFile

如果proc被指定，它必须是子程序或函数。

IF语句和他所有的关联语句包括后面的ELSE，必须出现在同一个逻辑程序行。下边的语句是不合法的：

IF a < b THEN t = 15 : u = 16 : v = 17 ELSE t = 17 : u = 16 : v = 15

因为编译器将ELSE语句视为一个崭新的语句，与上边的任何语句都没有关系。如果你需要在同一行安排更多语句，

你可允褂眯醒有禄摺癬”，将一个逻辑行展开跨越到几个物理行。举例，下边是个合法的途径来重新描述上边的例子： IF a < b THEN t = 15 : u = 16 : v = 17 _ ELSE t = 17 : u = 16 : v = 15

编写长和复杂IF/THEN结构的更好的方法是使用IF块 示例：

1. 2.

IF x > 100 THEN y = 3 ELSE y = 4 IF x = 0 then

Msgbox “x为0正确！” Else

Msgbox “x不为0！” End if

分支语句

下面是SELECT CASE语句的语法结构：

SELECT CASE [AS] [LONG | CONST | CONST$] expression CASE [IS] testlist {statements} [CASE [IS] testlist {statements}] [CASE ELSE {statements}] END SELECT 示例代码：

DIM Dwrd AS DWORD DIM Lint AS LONG Dwrd = &H0FFFFFFFF??? Lint = -1&

SELECT CASE Lint CASE Dwrd a$ = "A Match!" CASE ELSE a$ = "*No Match" END SELECT