freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

最新全國計(jì)算機(jī)等級考試二級筆試試卷vb語言程序設(shè)計(jì)(編輯修改稿)

2025-08-03 14:51 本頁面
 

【文章內(nèi)容簡介】 DEFG D、AABBCCDDEEFFGG2設(shè)有如下程序:Private Sub Form_Click( ) Dim ary(1 To 5) As Integer Dim i As Integer Dim sum As Integer For i=1 To 5 ary(i)=i+1 sum=sum+ary(i) Next iPrint sumEnd Sub程序運(yùn)行后,單擊窗體,輸出結(jié)果為( )。A、15 B、16 C、20 D、252有一個數(shù)列,它的前3個數(shù)為0,1,1,此后的每個數(shù)都是其前面3個數(shù)之和,即0,1,1,2,4,7,13,24,……要求編寫程序輸出該數(shù)列中所有不超過1000的數(shù)。Private Sub Form_Click( ) Dim i As Integer,aAs Integer ,b As IntegerDim c As Integer,d As Integera=0:b=1:c=1d=a+b+ci=5While d=1000 Print d。 a=b:b=c:c=d d=a+b+d i=i+1WendEnd Sub運(yùn)行上面的程序,發(fā)現(xiàn)輸出的數(shù)列不完整,應(yīng)進(jìn)行修改。以下正確的修改是A、把While d=1000改為While d1000 B、把i=5改為i=4 C、把i=i+1移到While d=1000的下面D、在i=5的上面增加一個語句:Print a。b。c2下面的語句用Array函數(shù)為數(shù)組變量a的各元素賦整數(shù)值:a=Array(1,2,3,4,5,6,7,8,9)針對a的聲明語句應(yīng)該是( )。A、Dim a B、Dim a As Integer C、Dim a(9) As Integer D、Dim a() As Integer2下列描述中正確的是( )。A、Visual Basic只能通過過程調(diào)用執(zhí)行通用過程 B、可以在Sub過程的代碼中包含另一個Sub過程的代碼 C、可以像通用過程一樣指定事件過程的名字 D、Sub過程和Function過程都有返回值2閱讀程序:Function fac(ByVal n As Integer)As Integer Dim temp As Integer temp=1 For i%=1 To n temp=temp*i% Next i% fac=tempEnd FunctionPrivate Sub Form_Click( ) Dim nsum As Integer nsum=1 For i%=2 To 4 nsum=nsum+fac(i%) Next i% Print nsum End Sub程序運(yùn)行后,單擊窗體,輸出結(jié)果是( )。A、35 B、31 C、33 D、37在窗體上畫一個命令按鈕和一個標(biāo)簽,其名稱分別為Command1和Label1,然后編寫如下代碼:Sub S(x As Integer,y As Integer) Static z As Integer y=x*x+z z=yEnd SubPrivate Sub Command1_Click( ) Dim i As Integer,z As Integer m=0 z=0 For i=1 To 3 S i,z m=m+z Next i =Str(m)End Sub程序運(yùn)行后,單擊命令按鈕
點(diǎn)擊復(fù)制文檔內(nèi)容
教學(xué)課件相關(guān)推薦
文庫吧 www.dybbs8.com
備案圖片鄂ICP備17016276號-1