大學(xué)VB考試題題庫

第題（分）題號第題（分）題號應(yīng)用程序是分層管理

試卷編號：21.0:24641.0:230vb

8066ActiveX控件是擴(kuò)展名為*.ocx的獨(dú)立文件，使用時需用的，其最高的層次為（）.A:工程B:模塊C:窗體D:過程

-、填空共10題（共計(jì)10分）"工程"/"部件”載入或移去.答案：Y答案：A

第1題（1.0分）題號:227第3題（1.0分）題號:289第5題（1.0分）題號:837用戶可以通過設(shè)置菜單

表達(dá)式land。的值[1].框架控件和形狀控件都不能響應(yīng)用戶的鼠標(biāo)的單擊事項(xiàng)的0屬性值為FALSE來使該菜單項(xiàng)不可見

答案：1）.False件.答案：Y.A:HideB:CheckedC:VisibleD:Enabled答案：C

第2題（1.0分）題號:222第4題（1.0分）題號:350第6題（1.0分）題號:334若要使標(biāo)簽控件顯示時,

把整數(shù)0賦給一個邏輯型變量，則邏輯變量的值為[1]在窗體模塊的聲明部分中用Private聲明的變量的有效不覆蓋其背景內(nèi)容，應(yīng)設(shè)置簽控件的0屬性.

答案：1）.False范圍是其所在的工程.答案：NA:BACKCOLORB:BORDERSTYLEC:FORECOLOR

第3題（1.0分）題號:60第5題（1.0分）題號:354在框架控件上放置的控D:BACKSTYLE答案：D

a和b中有僅只有一個為1,相應(yīng)的VisualBasic邏輯表件可以移動到框架控件的外面.答案：N第7題（1.0分）題號:377下列哪個變量的取法是

達(dá)式為【1].答案：1）.a=lxorb=l第6題（1.0分）題號:231可以用合并字符不正確的（）.A:TNameB:T_TempC:T32D:T32#答案：D

第4題（1.0分）題號:251串，但是用在變異變量時,"+”可能會將兩個數(shù)值加起來.第8題（1.0分）題號:380下列數(shù)據(jù)類型中,占用內(nèi)

Print"x="&（2=4）的結(jié)果為[1].答案：1）.x=False答案：Y存最小的是（）.A:BooleanB:ByteC:IntegerD:Single

第5題（1.0分）題號:244設(shè)x為一個兩位數(shù)，將x第7題（1.0分）題號:261答案：B

個位數(shù)和十位數(shù)交換后所得兩位數(shù)VB的表達(dá)式是[1]VB允許設(shè)計(jì)和使用用戶自己設(shè)計(jì)的控件.答案：Y第9題（1.0分）題號:371下列關(guān)于設(shè)置控件屬性

答案：1）.（xmod10）*10+int（x/10）第8題（1.0分）題號:247的敘述正確的是（）.A:用戶必須設(shè)置屬性值B:所有的屬

第6題（1.0分）題號:318Circle方法繪制扇形或圓弧圖形時，圖形的形狀不僅與性值都可以由用戶隨意設(shè)定C:屬性值不必一一重新

由Fork=35to0step3:nextk循環(huán)語句控制的循環(huán)次起始角、終止角的大小相關(guān)，而且與起始角、終止角的設(shè)置D:不同控件的屬性項(xiàng)都完全一樣答案：C

數(shù)是【1】.答案：1）.0正或負(fù)相關(guān).答案：Y第10題（1.0分）題號:801要使標(biāo)簽?zāi)軌蝻@示所需

第7題（1.0分）題號:226第9題（1.0分）題號:330有一個程序在屬性窗口要的東西,則在程序中應(yīng)設(shè)置其哪一屬性的值（）.

表達(dá)式32\7MOD3人2的值是【1】.答案：1）.4中設(shè)置了它的窗體字體大小為10號，而程序代碼若設(shè)A:CaptionB:TextC:NameD:AutoSize答案：A

第8題（1.0分）題號:288置了它的窗體字體大小為20號那么當(dāng)程序運(yùn)行后實(shí)際四、多項(xiàng)選擇共5題（共計(jì)10分）

文件按照存取方式及其組成結(jié)構(gòu)可以分為順序文件和的窗體字體大小為20號.答案：Y第1題（2.0分）題號:279

【1】.答案：1）.隨機(jī)文件或隨機(jī)笫10題1.0分題號:225VisualBasic程序的運(yùn)行可以下面有關(guān)數(shù)組的說法那些是錯誤的（）?

第9題（1.0分）題號:319OptionBase1的作用是從Main（）過程啟動，也可以從某個窗體啟動.答案：YA:數(shù)組存放的是具有相同數(shù)據(jù)類型的多個數(shù)據(jù)

確定數(shù)組的下界為【1】.答案1）.1三、單項(xiàng)選擇共10題（共計(jì)10分）B:數(shù)組的下標(biāo)允許是常數(shù)、表達(dá)式或變量

第10題（1.0分）題號:297第1題（1.0分）題號:319能夠改變窗體邊框線類C:DIM語句聲明的數(shù)組把數(shù)組中的全部數(shù)組都初始化

寫出清除圖片框的文字或圖形信息的語句【1】.型的屬性是0.A:FontStyleB:BorderStyleC:BackStyle為邏輯型

答案：1）.Picture1.cis或cisD:Border答案：BD:多維數(shù)組中每一維的大小為上界-下界；數(shù)組的大小

二、判斷共10題（共計(jì)10分）第2題（1.0分）題號:822以下（）對象不具有Clear為每一維大小的乘積

第1題（1.0分）題號:236方法.A:列表框B:組合框C:剪貼板D:圖片框答案：DE:動態(tài)數(shù)組是指在聲明時沒有給出數(shù)組的大小，當(dāng)要使

所有的VB的變量，都有隱含說明字符和強(qiáng)調(diào)聲明兩種第3題（1.0分）題號:258常量-0.00013579的科學(xué)用數(shù)組時，再決定數(shù)組的大小答案：BCD

方法來定義.答案：N計(jì)數(shù)法是（）.A:-l,3579E+0.4B:.00013579C:-13.579E-5第2題（2.0分）題號:277

D:-1.3579E-0.4答案:C下列說法哪些是正確的（）?

A:不能對符號常量重新賦值ForI=2To10，**********FouND**********

B:Label控件用來在窗體中顯示文本，其中的文本用戶t=t*Ix=xAj

不能直接修改，**********sPACE**********Nextj

C:TAB（）函數(shù)用于在輸出表達(dá)式前將輸出點(diǎn)定位在第[?]fac=x

N-1個字符位置，**********Sp/^CE**********EndFunction

D:格式輸出函數(shù)Format?？梢允箶?shù)值、FI期或字符串按[?]PrivateSubForm_Click()

用戶指定的格式輸出答案：ABDPrintsDimCAsSingle

第3題（2.0分）題號:280EndSubDimmAsInteger,nAsInteger

請把下面說法中正確的選出來（）。m=Val(InputBox("請輸入一個整數(shù)(m)："))

A:在函數(shù)調(diào)用過程中數(shù)值型函數(shù)的默認(rèn)返回值為0,可答案：n=Val(InputBox("請輸入一個整數(shù)(n)："))

變型函數(shù)的默認(rèn)返回值為空串1).t=1,**********FOUND**********

B:在調(diào)用Sub過程中使用Call語句時，參數(shù)必須在括2).s=s+tC=fac(n)/fac(n?m)*fac(m)

號內(nèi)3).NextI或NextPrint℃=*';C

C:過程本身使用的參數(shù)列表稱為“形參”，而主程序傳—EndSub

遞給過程的真正參數(shù)稱為“實(shí)參”六、程序改錯共2題（共計(jì)20分）答案：

D:DIM語句聲明的數(shù)組把數(shù)值數(shù)組中的全部數(shù)組元素—1).X=1

都初始化為0,把字符串?dāng)?shù)組中的全部元素都初始化為第1題（10.0分）題號:4602).x=x*j或x=j*x

空字符串答案：BCD—3).C=fac(n)/fac(n-m)/fac(m)或C=fac(n)/

第4題（2.0分）題號:285'【程序改錯】(fac(n-m)*fac(m))或C=fac(n)/(fac(n-m)*

在VB中，需要用數(shù)據(jù)訪問對象對數(shù)據(jù)庫進(jìn)行訪問，下—fac(m))

列哪些屬于VB的數(shù)據(jù)訪問對象（）。'題目：已知C的公式表示如下：第2題（10.0分）題號:467

A:DAOB:ADOC:OADD:RDO答案：ABD'n!—

第5題（2.0分）題號:276下列語句哪些是錯誤的'C=------------------'【程序改錯】

語句()？A:ConstImaxAsInteger=&ol55'(n-m)!*m!—

B:Const_GaAsString=MabcMC:Dimaa,bbAsInteger,cc'題目：從計(jì)算機(jī)輸入三個數(shù)，找出中間數(shù)

AsStringD:yy=8,uu=9答案：BD'函數(shù)過程fac（）求k!函數(shù)，在Fomr_Click事件中完成—

五、程序填空共1題（共計(jì)10分）運(yùn)算，OptionExplicit

第1題（10.0分）題號:57'請修正程序中錯誤。PrivateSubFindMidNum()

,【程序填空】tDimxAsInteger,yAsInteger,zAsInteger,AAs

'功能：求1!+2!+……+10!的值。OptionExplicitInteger

fPrivateFunctionfac(kAsInteger)AsSinglex=InputBox(TLEASEINPUTTHEFIRST

PrivateSubForm_Click()DimxAsSingle,jAsIntegerNUMBER1')

，**********Sp^cE**********,**********FOUND**********y=InputBox("PLEASEINPUTTHESECOND

[?]x=0NUMBER")

s=1Forj=1Tokz=lnputBox(nPLESSEINPUTTHETHIRD

NUMBER")在窗體內(nèi)添加7個按鈕(Commandl,Command2,

,**********FOUND**********Commands,Command4,Command5,

Ifx>yThenDimyAsDoubleCommand6,Command?)。

A=xDimiAsInteger2、窗體設(shè)置：

x=yFori=1Tom設(shè)置窗體名稱(Name)為“Form21”。

y=Ay=y+1/(2*i)設(shè)置窗體標(biāo)題(Caption)為“控件示例北

EndIfNext3、菜單設(shè)置：

,**********FOUND**********fun=y設(shè)置菜單(menu_File)的標(biāo)題(Caption)為“文件

Ify=zThen(&F)”。

Printy設(shè)置菜單(menu_Option)的標(biāo)題(Caption)為“選項(xiàng)

,**********FOUND**********八、VB窗體設(shè)計(jì)共2題(共計(jì)20分)(&O)”。

Elselfx=zThen設(shè)置菜單(menu_Option)下的菜單

Printz(menu_Option_TestButton)的標(biāo)題(Caption)為“測試按

Else第1題(10.0分)題號:21鈕O

Printx設(shè)置菜單(menu_Option)下的菜單

EndIf【窗體設(shè)計(jì)】(menu_Option_CheckBox)的標(biāo)題(Caption)為“復(fù)選框

EndSub設(shè)置菜單(menu_Option)下的菜單

PrivateSubForm_Click()題目：請按照題目要求設(shè)計(jì)指定的窗體。(menu_Option_TextWarp)的標(biāo)題(Caption)為"文本換

FindMidNum建立如(圖I)所示界面：請按所給窗體的樣子設(shè)行二

EndSub計(jì)窗體，不要求控件的尺寸一樣，運(yùn)行時得到設(shè)置菜單(menu_Option)下的菜單

答案所(menu_Option_OptionButton)的標(biāo)題(Caption)為“選項(xiàng)

1).Ifx<yThen或Ify>xThen給窗體即可，有時需要簡單的事件過程。要求按鈕”。

2).Ify>=zThen或Ifzv=yThen“退出”選項(xiàng)包含在“文件”菜單中，其余選設(shè)置菜單(menu_Option)下的菜單

3).Elselfx>=zThen或Elselfz<=xThen項(xiàng)包含(menu_Option_TextBox)的標(biāo)題(Caption)為"文本框

在“選項(xiàng)”菜單中。設(shè)置菜單(menu_Option)下的菜單

七、程序設(shè)計(jì)共1題(共計(jì)10分)(menu_Option_Image)的標(biāo)題(Caption)為“圖像

1、在窗體內(nèi)添加2個菜單(名稱分別為menu_File,4、按鈕設(shè)置：

第1題(10.0分)題號:479menu_Option),設(shè)置按鈕(Commandl)的標(biāo)題(Caption)為“測試按鈕

然后在菜單(menu_File)下添加1個菜單(名稱為(&T)”。

【程序設(shè)計(jì)】menu_File_Exit)設(shè)置按鈕(Command2)的標(biāo)題(Caption)為"復(fù)選框

在菜單(menu_Option)下添加6個菜單(名稱分別為(&C)”。

題目：編寫函數(shù)fun其功能是：根據(jù)整型形參m,計(jì)menu_Option_TestButton,設(shè)置按鈕(Command3)的標(biāo)題(Caption)為“文本換行

算menu_Option_CheckBox,menu_Option_TextWarp,(&W)”。

,如下公式的值：y=l/2+1/4+1/6+...+l/2mmenu_Option_OptionButton,設(shè)置按鈕(Commands的標(biāo)題(Caption)為“選項(xiàng)按鈕

1例如：若m=9,則應(yīng)輸出：1.41448412698413menu_Option_TextBox,menu_Option_Image)o(&P)”。

設(shè)置按鈕（Command5）的標(biāo)題（Caption）為“文本框3）排序?qū)傩栽O(shè)為真第10題（1.0分）題號:297

（&E）”。4）Top為3360,Left為2280寫出清除圖片框的文字或圖形信息的語句【1】.

設(shè)置按鈕（Command6）的標(biāo)題（Caption）為“圖像6、在窗體右下角添加一個命令按鈕答案1）.Picture1.cis或cis

（&I）”。1）名稱為“計(jì)時切換”二、判斷共10題（共計(jì)10分）

設(shè)置按鈕（Command?）的標(biāo)題（Caption）為“退出2）標(biāo)題為“計(jì)時”第1題（1.0分）題號:236

（&X）”3）在單擊事件過程中添加代碼，使時鐘控件的所有的VB的變量，都有隱含說明字符和強(qiáng)調(diào)聲明兩種

第2題（10.0分）題號:54Enabled屬性值取反。方法來定義答案：N

------此為題目要求的最后一行，以下空白第2題（1.0分）題號:246

【窗體設(shè)計(jì)】ActiveX控件是擴(kuò)展名為*.ocx的獨(dú)立文件，使用時需用

試卷編號："工程部件"載入或移去.答案：Y

題目：請按照題目要求設(shè)計(jì)指定的窗體。（本題有6個8066第3題（1.0分）題號:289

項(xiàng)目要完成）一、填空共io題（共計(jì)10分）框架控件和形狀控件都不能響應(yīng)用戶的鼠標(biāo)的單擊事

建立如圖009所示界面：第1題（1.0分）題號:227表達(dá)式1and。的在【1】.件.答案：Y

注意：保存時不得修改窗體和工程文件的名稱及路徑,答案：1）.False第4題（1.0分）題號:350

否則后果自負(fù)。第2題（1.0分）題號:222在窗體模塊的聲明部分中用Private聲明的變量的有效

把整數(shù)0賦給一個邏輯型變量，則邏輯變量的值為[1]范圍是其所在的工程.答案：N

1、窗體設(shè)置答案：1）.False第5題（1.0分）題號:354

1）名稱為“模板”第3題a和b中有僅只有一個為1,相應(yīng)的Visual在框架控件上放置的控件可以移動到框架控件的外面.

2）標(biāo)題為“南京工程學(xué)院”Basic邏輯表達(dá)式為【1].答案：1）.a=lxorb=l答案：N

2、在窗體上方添加一個標(biāo)簽控件第4題（1.0分）題號:251Print"x="&（2=4）的結(jié)第6題（1.0分）題號:231

1）對齊方式為右對齊果為【1】.答案：1）.x=False可以用合并字符電但是用在變異變量時,"+”可

2）設(shè)置背景透明，邊框風(fēng)格為1第5題（1.0分）題號:244設(shè)x為一個兩位數(shù),能會將兩個數(shù)值加起來.答案：Y

3）內(nèi)容為“透明右對齊”將x個位數(shù)和十位數(shù)交換后所得兩位數(shù)VB的表達(dá)式是第7題（1.0分）題號:261

3、在前一個標(biāo)簽下方添加另一個標(biāo)簽控件[1].答案：1）.（xmod10）*10+int（x/10）VB允許設(shè)計(jì)和使用用戶自己設(shè)計(jì)的控件.答案：Y

1）能自動調(diào)整大小第6題（1.0分）題號:318由Fork=35to0step第8題（1.0分）題號:247

2）背景色為白色，值為H00FFFFFF3:nextk循環(huán)語句控制的循環(huán)次數(shù)是[1].答案：1）.0Circle方法繪制扇形或圓弧圖形時，圖形的形狀不僅與

3）標(biāo)題為“0”第7題（1.0分）題號:226表達(dá)式32\7MOD起始角、終止角的大小相關(guān)，而且與起始角、終止角的

4）字體大小為363”的值是【1】.答案：1）.4正或負(fù)相關(guān).答案：Y

4、在窗體上添加一個時鐘控件第8題（1.0分）題號:288第9題（1.0分）題號:330有一個程序在屬性窗口

1）時間間隔為1秒文件按照存取方式及其組成結(jié)構(gòu)可以分為順序文件和中設(shè)置了它的窗體字體大小為10號，而程序代碼若設(shè)

2）在Timer事件過程中添加代碼，使第二個標(biāo)簽【1】.答案：1）.隨機(jī)文件或隨機(jī)置了它的窗體字體大小為20號,那么當(dāng)程序運(yùn)行后實(shí)

的標(biāo)題的值加一。際的窗體字體大小為20號.答案：Y

5、在窗體下方添加一個列表框控件第9題（1.0分）題號:319OptionBase1的作用是確第10題（1.0分）題號:225

1）名稱為“列表”定數(shù)組的下界為【1】.答案:1）.1VisualBasic程序的運(yùn)行可以從Main。過程啟動也可以

2）設(shè)置為不可用從某個窗體啟動.答案：Y

三、單項(xiàng)選擇共10題（共計(jì)10分）答案：C字符串答案：BCD

第1題（1.0分）題號:319第10題（1.0分）題號:801第4題（2.0分）題號:285

能夠改變窗體邊框線類型的屬性是（）.要使標(biāo)簽?zāi)軌蝻@示所需要的東西,則在程序中應(yīng)設(shè)置其在VB中，需要用數(shù)據(jù)訪問對象對數(shù)據(jù)庫進(jìn)行訪問，下

A:FontStyleB:BorderStyleC:BackStyleD:Border哪一屬性的值（）.列哪些屬于VB的數(shù)據(jù)訪問對象（）。

答案：BA:CaptionB:TextC:NameD:AutoSize答案：AA:DAOB:ADOC:OADD:RDO答案：ABD

第2題（1.0分）題號:822四、多項(xiàng)選擇共5題（共計(jì)10分）第5題（2.0分）題號:276

以下（）對象不具有Clear方法A:列表框第1題（2.0分）題號:279下列語句哪些是錯誤的語句（）?

B:組合框C:剪貼板D:圖片框答案：D下面有關(guān)數(shù)組的說法那些是錯誤的（）?A:ConstImaxAsInteger=&ol55B:Const_GaAs

第3題（1.0分）題號:258A:數(shù)組存放的是具有相同數(shù)據(jù)類型的多個數(shù)據(jù)String="abc,'C:Dimaa,bbAsInteger,ccAsString

常量-0.00013579的科學(xué)計(jì)數(shù)法是（）.B:數(shù)組的下標(biāo)允許是常數(shù)、表達(dá)式或變量D:yy=8,uu=9答案：BD

A:-l,3579E+0.4B:.00013579C:DIM語句聲明的數(shù)組把數(shù)組中的全部數(shù)組都初始化五、程序填空共1題（共計(jì)10分）

C:-13.579E-5D:-1.3579E-0.4答案：C為邏輯型第1題（10.0分）題號:57

第4題（1.0分）題號:230D:多維數(shù)組中每一維的大小為上界-下界；數(shù)組的大小

vb應(yīng)用程序是分層管理的，其最高的層次為0.為每一維大小的乘積1【程序填空】

A:工程B:模塊C:窗體D:過程答案：AE:動態(tài)數(shù)組是指在聲明時沒有給出數(shù)組的大小，當(dāng)要使

第5題（1.0分）題號:837用數(shù)組時，再決定數(shù)組的大小答案：BCD助能：求1!+2!+……+10!的值。

用戶可以通過設(shè)置菜單項(xiàng)的（）屬性值為FALSE來使該第2題（2.0分）題號:277

菜單項(xiàng)不可見.A:HideB:CheckedC:Visible下列說法哪些是正確的（）?PrivateSubForm_Click（）

D:Enabled答案：CA:不能對符號常量重新賦值，**********Spy^CE**********

第6題（1.0分）題號:334B:Label控件用來在窗體中顯示文本，其中的文本用戶[?]

若要使標(biāo)簽控件顯示時，不覆蓋其背景內(nèi)容，應(yīng)設(shè)置標(biāo)不能直接修改s=1

簽控件的（）屬性.A:BACKCOLORB:BORDERSTYLEC:TAB（）函數(shù)用于在輸出表達(dá)式前將輸出點(diǎn)定位在第ForI=2To10

C:FORECOLORD:BACKSTYLE答案：DN-1個字符位置t=t*I

第7題（1.0分）題號:377D:格式輸出函數(shù)Format。可以使數(shù)值、日期或字符串按**********Sp/^CE******求***

下列哪個變量的取法是不正確的0.用戶指定的格式輸出答案：ABD

A:TNameB:T_TempC:T32D:T32#答案：D第3題（2.0分）題號:280|**********SPACE**********

第8題（1.0分）題號:380請把下面說法中正確的選出來（）。r?i

下列數(shù)據(jù)類型中，占用內(nèi)存最小的是（）.A:在函數(shù)調(diào)用過程中數(shù)值型函數(shù)的默認(rèn)返回值為0,可Prints

A:BooleanB:ByteC:IntegerD:Single答案：B變型函數(shù)的默認(rèn)返回值為空串EndSub

第9題（1.0分）題號:371B:在調(diào)用Sub過程中使用Call語句時，參數(shù)必須在括答案：

下列關(guān)于設(shè)置控件屬性的敘述正確的是（）.號內(nèi)1）.t=1

A:用戶必須設(shè)置屬性值C:過程本身使用的參數(shù)列表稱為“形參”，而主程序傳2）.s=s+t

B:所有的屬性值都可以由用戶隨意設(shè)定遞給過程的真正參數(shù)稱為“實(shí)參”3）.NextI或Next

C:屬性值不必一一重新設(shè)置D:DIM語句聲明的數(shù)組把數(shù)值數(shù)組中的全部數(shù)組元素六、程序改錯共2題（共計(jì)20分）

D:不同控件的屬性項(xiàng)都完全一樣=都初始化為0,把字符串?dāng)?shù)組中的全部元素都初始化空第1題（10.0分）題號:460

3).C=fac(n)/fac(n-m)/fac(m)或C=fac(n)/PrivateSubForm_Click()

’【程序改錯】(fac(n-m)*fac(m))或C=fac(n)/(fac(n-m)*FindMidNum

fac(m))EndSub

題目：已知C的公式表示如下:第2題(10.0分)題號:467

'n!

C=-----------------'【程序改錯】答案：

(n-m)!*m!—1).Ifx<yThen或Ify>xThen

題目：從計(jì)算機(jī)輸入三個數(shù)，找出中間數(shù)2).Ify>=zThen或Ifz<=yThen

'函數(shù)過程fac（）求k!函數(shù)，在Fomr_Click事件中完成—3).Elselfx>=zThen或Elselfz<=xThen

運(yùn)算，OptionExplicit—

'請修正程序中錯誤。PrivateSubFindMidNum。七、程序設(shè)計(jì)共1題（共計(jì)10分）

DimxAsInteger,yAsInteger,zAsInteger,AAs—

OptionExplicitInteger第1題（10.0分）題號:479

PrivateFunctionfac(kAsInteger)AsSinglex=InputBox("PLEASEINPUTTHEFIRST1

DimxAsSingle,jAsIntegerNUMBER'1),【程序設(shè)計(jì)】

**********FOUND**********y=InputBox(nPLEASEINPUTTHESECOND

x=0NUMBER")'題目：編寫函數(shù)fun其功能是：根據(jù)整型形參m,計(jì)

Forj=1Tokz=lnputBox(nPLESSEINPUTTHETHIRD算

**********F(JUND**********NUMBER'1)■如下公式的值：y=l/2+l/4+l/6+...+l/2m

x=xAj,**********FOUND**********,例如：若m=9,則應(yīng)輸出：1.41448412698413

NextjIfx>yThen

fac=xA=x答案：----------------

EndFunctionx=y