6,=""s=0Fori=1To100Ifa(i)Mod2==&a(i)&Space(1)s=s+a(i)EndIfputdatas7,在标签中显示出列表的数量:=,显示相应的文件夹,用msgbox(新弹出的提示框)显示文件名PrivateSubDir1_Change()=()=()()==,=Len()'=UCase()':=250'=500'"visualbasic"15,tooltiptext为鼠标暂停在控件时显示的文字。Passwordchar设为#,则输入的文字全部以#显示出来。。(第14套题)=(0).=
vb 上机总结 来自淘豆网m.daumloan.com转载请标明出处.
