[填空題] 工程中有Form1、Form2兩個(gè)窗體。Form1窗體外觀如圖1所示。程序運(yùn)行時(shí)，在Form1中名稱為Text1的文本框中輸入一個(gè)數(shù)值(圓的半徑)，然后單擊命令按鈕"計(jì)算并顯示"(其名稱為Command1)，則顯示Form2窗體，且根據(jù)輸入的圓的半徑計(jì)算圓的面積，并在Form2的窗體上顯示出來，如圖2所示。如果單擊命令按鈕時(shí)，文本框中輸入的不是數(shù)值，則用信息框顯示"請(qǐng)輸入數(shù)值數(shù)據(jù)!"。請(qǐng)?zhí)羁铡?/p>

Private Sub Command1_Click()

If Text1.Text=" "Then

MsgBox"請(qǐng)輸入半徑!"

Elself Not IsNumeric( (9) )Then

MsgBox"請(qǐng)輸入數(shù)值數(shù)據(jù)!"

Else

r=Val( (10) )

Form2.Show

(11) .Print"圓的面積是"＆3.14"r*r

End If

End Sub

Form2

IsNumeric是一個(gè)字符串函數(shù)，其參數(shù)是一個(gè)字符串或者數(shù)字，返回值是一個(gè)布爾值，如果這個(gè)參數(shù)是純數(shù)字組成，將會(huì)返回True，否則將返回False，在這里的作用是為了檢驗(yàn)文本框中輸入的是否為純數(shù)據(jù)即數(shù)值數(shù)據(jù)，所以[9]應(yīng)該填Text1.Text；在判斷完成以后要將Text1中的文本內(nèi)容轉(zhuǎn)化為數(shù)字，因此[10]也應(yīng)填Text1.Text；最后輸入的結(jié)果要在Form2中顯示出來，所以[11]應(yīng)該填Form2，表示利用的是Form2的Print方法。