注冊(cè) 登錄
Office中國論壇/Access中國論壇 返回首頁

ganlinlao的個(gè)人空間 http://m.mzhfr.cn/?230471 [收藏] [復(fù)制] [分享] [RSS]

日志

Freebasic菜鳥初學(xué)Freebasic基礎(chǔ)教程三:帶參數(shù)的宏定義

已有 2698 次閱讀2017-5-8 17:43 |個(gè)人分類:FreeBasic| Freebasic基礎(chǔ)教程, Freebasic入門, Freebasic, Freebasic基礎(chǔ)教程, Freebasic入門, Freebasic

FB語言允許宏帶有參數(shù)。在宏定義中的參數(shù)稱為形式參數(shù),在宏調(diào)用中的參數(shù)稱為實(shí)際參數(shù),這點(diǎn)和函數(shù)有些類似。

'冬瓜湯改編自c語言中文網(wǎng)c語言基礎(chǔ)入門

對(duì)帶參數(shù)的宏,在調(diào)用中,不僅要宏展開,而且要用實(shí)參去代換形參。

 帶參宏定義的一般形式為:
#define 宏名(形參列表) 字符串
在字符串中含有各個(gè)形參。

 帶參宏調(diào)用的一般形式為:
宏名(實(shí)參列表);
例如: #define M(y)  y*y+3*y  '宏定義
'// Code
k=M(5);  //宏調(diào)用
在宏調(diào)用時(shí),用實(shí)參5去代替形參y,經(jīng)預(yù)處理宏展開后的語句為k=5*5+3*5。

 【示例】輸出兩個(gè)數(shù)中較大的數(shù)。
#define MAX(a,b)  iif(a>b, a , b)
   Dim As long x,y,myMax
   input "請(qǐng)輸入一個(gè)數(shù)字: " ,x
   Input "請(qǐng)輸入另一個(gè)數(shù)字:" ,y
   myMax = MAX(x, y)
    print myMax
    sleep

運(yùn)行結(jié)果:
輸入兩個(gè)數(shù)字: 10 20
 max=20

程序第2行進(jìn)行了帶參宏定義,用宏名MAX表示條件表達(dá)式iif(a>b, a , b),形參a、b均出現(xiàn)在條件表達(dá)式中。程序第7行myMax=MAX(x, y)為宏調(diào)用,實(shí)參 x、y 將代換形參a、b。宏展開后該語句為: max=iif(x>y, x , y)

對(duì)帶參宏定義的說明
1) 帶參宏定義中,形參之間可以出現(xiàn)空格,但是宏名和形參列表之間不能有空格出現(xiàn)。例如把: #define MAX(a,b)  iif(a>b, a , b)
寫為: #define MAX  (a,b)  iif(a>b, a , b)
將被認(rèn)為是無參宏定義,宏名MAX代表字符串(a,b) iif(a>b, a , b)。宏展開時(shí),宏調(diào)用語句: max=MAX(x,y);
將變?yōu)椋?max=(a,b)iif(a>b, a , b)(x,y)
這顯然是錯(cuò)誤的。

2) 在帶參宏定義中,不會(huì)為形式參數(shù)分配內(nèi)存,因此不必指明數(shù)據(jù)類型。而在宏調(diào)用中,實(shí)參包含了具體的數(shù)據(jù),要用它們?nèi)ゴ鷵Q形參,因此必須指明數(shù)據(jù)類型。

 這一點(diǎn)和函數(shù)是不同的:在函數(shù)中,形參和實(shí)參是兩個(gè)不同的變量,都有自己的作用域,調(diào)用時(shí)要把實(shí)參的值傳遞給形參;而在帶參數(shù)的宏中,只是符號(hào)的替換,不存在值傳遞的問題。

 【示例】輸入 n,輸出 (n+1)^2 的值。

#define SQ(y) (y)*(y)
   Dim As Long  a, sq;

 input "input a number: ",a
sq = SQ(a+1);
print  "sq=" + sq



運(yùn)行結(jié)果:
input a number: 9
 sq=100

第2行為宏定義,形參為 y。第7行宏調(diào)用中實(shí)參為 a+1,是一個(gè)表達(dá)式,在宏展開時(shí),用 a+1 代換 y,再用 (y)*(y) 代換 SQ,得到如下語句: sq=(a+1)*(a+1);
這與函數(shù)的調(diào)用是不同的,函數(shù)調(diào)用時(shí)要把實(shí)參表達(dá)式的值求出來再傳遞給形參,而宏展開中對(duì)實(shí)參表達(dá)式不作計(jì)算,直接按照原樣替換。

3) 在宏定義中,字符串內(nèi)的形參通常要用括號(hào)括起來以避免出錯(cuò)。例如上面的宏定義中 (y)*(y) 表達(dá)式的 y 都用括號(hào)括起來,因此結(jié)果是正確的。如果去掉括號(hào),把程序改為以下形式:

#define SQ(y) y*y
 Dim As Long  a, sq;
 input "input a number: ",a
sq = SQ(a+1);
print  "sq=" + sq


運(yùn)行結(jié)果為:
input a number: 9
 sq=19
同樣輸入9,但結(jié)果卻是不一樣的。問題在哪里呢?這是由于替換只作符號(hào)替換而不作其它處理而造成的。宏替換后將得到以下語句: sq=a+1*a+1;
由于a為9故sq的值為19。這顯然與題意相違,因此參數(shù)兩邊的括號(hào)是不能少的。即使在參數(shù)兩邊加括號(hào)還是不夠的,請(qǐng)看下面程序:
#define SQ(y) (y)*(y)
 Dim As Long  a, sq;
 input "input a number: ",a
sq = 200/SQ(a+1);
print  "sq=" + sq
與前面的代碼相比,只是把宏調(diào)用語句改為: sq=200/SQ(a+1);
運(yùn)行程序后,如果仍然輸入 9,那么我們希望的結(jié)果為 2。但實(shí)際情況并非如此:
input a number: 9
 sq=200
為什么會(huì)得這樣的結(jié)果呢?分析宏調(diào)用語句,在宏展開之后變?yōu)椋?sq=200/(a+1)*(a+1);
a 為 9 時(shí),由于“/”和“*”運(yùn)算符優(yōu)先級(jí)和結(jié)合性相同,所以先計(jì)算 200/(9+1),結(jié)果為 20,再計(jì)算 20*(9+1),最后得到 200。

 為了得到正確答案,應(yīng)該在宏定義中的整個(gè)字符串外加括號(hào):
#define SQ(y) ((y)*(y))
 Dim As Long  a, sq;
 input "input a number: ",a
sq = 200/SQ(a+1);
print  "sq=" + sq

由此可見,對(duì)于帶參宏定義不僅要在參數(shù)兩側(cè)加括號(hào),還應(yīng)該在整個(gè)字符串外加括號(hào)。

帶參數(shù)的宏和函數(shù)很相似,但有本質(zhì)上的區(qū)別:宏展開僅僅是字符串的替換,不會(huì)對(duì)表達(dá)式進(jìn)行計(jì)算;宏在編譯之前就被處理掉了,它沒有機(jī)會(huì)參與編譯,也不會(huì)占用內(nèi)存。而函數(shù)是一段可以重復(fù)使用的代碼,會(huì)被編譯,會(huì)給它分配內(nèi)存,每次調(diào)用函數(shù),就是執(zhí)行這塊內(nèi)存中的代碼。

評(píng)論 (0 個(gè)評(píng)論)

facelist doodle 涂鴉板

您需要登錄后才可以評(píng)論 登錄 | 注冊(cè)

QQ|站長郵箱|小黑屋|手機(jī)版|Office中國/Access中國 ( 粵ICP備10043721號(hào)-1 )  

GMT+8, 2025-7-13 03:03 , Processed in 0.067678 second(s), 17 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回頂部