[填空題] 在Visual Basic工程prjl中包含有兩個(gè)窗體，窗體form1(主窗體)上有兩個(gè)命令按鈕command1和 command2，一個(gè)文本控件text1；窗體dialog是一個(gè)對(duì)話窗體，窗體包含兩個(gè)命令按鈕OK和Cancel，一個(gè)文本控件text1和一個(gè)標(biāo)簽控件labe11。

編寫程序要求實(shí)現(xiàn)的功能為：窗體form 1上command1的caption屬性值為name，程序運(yùn)行后，當(dāng)單擊 eommand1時(shí)，彈出對(duì)話窗體dialog，其labe11控件中的提示信息為“please input your name：”，要求用戶輸入自己的姓名。如果單擊OK按鈕，保存當(dāng)前輸入的內(nèi)容并返回form1界面，command1的caption屬性值為email。若再次單擊command1命令按鈕，仍然出現(xiàn)dialog對(duì)話窗體，此時(shí)dialog的labe11提示用戶輸入自己的email，當(dāng)用戶輸入email后，單擊“確定”按鈕，保存當(dāng)前輸入的內(nèi)容并返回form1界面；如果單擊Cancel按鈕，則輸入內(nèi)容無效并返回form1。

Private Sub Command1_Click()

Dialog. Text1. Text = ""

Dialog. Show

End Sub

Private Sub Command2_Click()

Text1. Text = "email: "+ Dialog. email +" name: "+ Dialog. fname

End Sub

Private Sub Form_ Load()

Command1. Caption = "name"

【7】 . Caption = "please input your name:

Dialog. i = 0

End Sub

Option Explicit

[7]Dialog．Label1 [8]i＝i+1 [9]Form1．Command1 [10]Form1．Command1

先來看空【7】處，需要將某個(gè)控件的caption屬性值設(shè)置為“please input your name：”，依據(jù)題目開始的描述，需要設(shè)置成該屬性值的控件是對(duì)話窗體dialog中的標(biāo)簽label1，所以該處填寫Dialog．Label1，而且需要注意的是，該處的dialog．是不能省掉的。接下來，在空【8】處，根據(jù)其下面的程序可以看出，利用i的值來判斷區(qū)分當(dāng)前要求輸入的內(nèi)容是name還是email，而在程序中卻發(fā)現(xiàn)缺少了使i值遞增的語(yǔ)句，即i＝i+l。在空【9】處，如果當(dāng)前輸入的是name，則某個(gè)控件caption屬性值變?yōu)閑mail，如果輸入的是email，則該控件的 capUon屬性值變?yōu)閚ame，根據(jù)題目的要求，需要這樣改變，caption屬性的控件是窗體forml中的commandl命令按鈕，因?yàn)楫?dāng)前窗體是dialog，因此還需要注明按鈕所在的窗體，即form1，所以該處應(yīng)該填寫Form1． Command1。同樣地，在空【10】處，也應(yīng)該填寫Form1。Command1。