某網站注冊密碼需要符合以下兩點條件：①密碼不少于4位字符組成；②必須同時包含4種字符，大寫字母“A-Z”，小寫字母“a-2”，數字“0-9”，特殊符號“！@#%^&*”，方了方便批量注冊，小迪同學編寫了自動生成密碼的VB程序，程序運行界面如a所示，當在文本框Text1中輸入需生成密碼長度，點擊“生成密碼”按鈕（Command1），在文本框Text2中輸出符合要求的密碼串。＜imgsrc=“image13.png“style=“vertical-align：middle；border：0“/＞
（1）下列對象不具有Caption屬性的是_{___________}（單選，填字母：A.Command1/B.Form1/C.Text1/D.Label1）
（2）實現上述功能的VB程序如下，請在橫線處填入合適代碼。①

Int（Rnd*70）+1

Int（Rnd*70）+1

，②

b（j）＜＞0

b（j）＜＞0

。
（3）程序代碼中的加框處代碼有誤，請改正。改正：

k＞a（i）

k＞a（i）

_PrivateSubCommand1_Click

（　　）

（　　）

Dima（0To4）AsInteger,b（1To4）AsIntegerDimkeyAsString,sAsString,nAsInteger,kAsInteger,iAsInteger,jAsInteger,sumAsIntegerkey=“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789!@#%^&*“
Randomize
n=Val（Text1.Text）
a（0）=0：a（1）=26：a（2）=52：a（3）=62：a（4）=70'記錄每種符號的結束位置
s=““
For i=1 To 4
b（i）=0'b數組記錄某類符號是否使用
Next i
sum=4'當前未使用字符類型，初始為4種
Do While Len（s）+sum＜n
k=①'隨機選擇一個密碼序號
s=s+Mid（key,k,1）
i=1
Do While k＞=a（i）
i=i+1
Loop
b（i）=1
sum=4-b（1）-b（2）-b（3）-b（4）
Loop
'生成剩余未出現元素密碼，保證4種符號均有出現
For i=1 To sum
j=Int（Rnd*4）+1
Do While（②

b（j）＜＞0

b（j）＜＞0

）
j=j Mod 4+1
Loop
b（j）=1
k=Int（Rnd*（a（j）-a（j-1）））+a（j-1）+1
s=s+Mid（key,k,1）
Next i
Text2.Text=s
End Sub
（4）如果文本框Text1中輸入值2，文本框Text2中輸出字符長度為

B

B

（單選，填字母A.2 B.4 C.運行錯誤D.沒有輸出）