【正文】 Then MsgBox (x必須在1～1之間) Exit Sub End If fx = a1 * x a2 * x * x t = (1) * x * x Do a = 1 / (a1 + a2) t = (1) * t * x fx = 17 a1 = a2 18 Loop Until Abs(a * t) text2 = fxEnd Sub7．學(xué)生的某次課程測(cè)驗(yàn)中，選擇題的答案已記錄在列表框List1中，其數(shù)據(jù)行格式是：學(xué)號(hào)為6個(gè)字符長(zhǎng)度、2個(gè)空格、選擇題的答案為15個(gè)字符長(zhǎng)度。 A．在Sub或Function過(guò)程內(nèi)部不能再定義其它Sub或Function過(guò)程 B．對(duì)于使用ByRef說(shuō)明的形參，在過(guò)程調(diào)用時(shí)形參和實(shí)參只能按傳地址方式結(jié)合 C．遞歸過(guò)程既可以是遞歸Function過(guò)程，也可以是遞歸Sub過(guò)程 D．可以像調(diào)用Sub過(guò)程一樣使用Call語(yǔ)句調(diào)用Function過(guò)程26．以下有關(guān)對(duì)象屬性的說(shuō)法中，錯(cuò)誤的是 26 。 A．從理論上看，其上傳速度與下載速度相同 B．一條電話線上可同時(shí)接聽(tīng)，撥打電話和進(jìn)行數(shù)據(jù)傳輸 C．利用ADSL技術(shù)進(jìn)行數(shù)據(jù)傳輸時(shí)，有效傳輸距離可達(dá)幾公里 D．目前利用ADSL技術(shù)上網(wǎng)的計(jì)算機(jī)一般需要使用以太網(wǎng)網(wǎng)卡13．人們往往會(huì)用“我用的是10M寬帶上網(wǎng)”來(lái)說(shuō)明白己計(jì)算機(jī)連網(wǎng)的性能，這里的“10M”指的是數(shù)據(jù)通信中的 13 指標(biāo)。計(jì)算機(jī)基礎(chǔ)知識(shí)與Visual Basic程序設(shè)計(jì)作者：日期：n更多企業(yè)學(xué)院： 《中小企業(yè)管理全能版》183套講座+89700份資料《總經(jīng)理、高層管理》49套講座+16388份資料《中層管理學(xué)院》46套講座+6020份資料 A．網(wǎng)絡(luò)號(hào)、主機(jī)號(hào)和類型號(hào) B．類型號(hào)、網(wǎng)絡(luò)號(hào)和主機(jī)號(hào) C．網(wǎng)絡(luò)號(hào)、類型號(hào)和主機(jī)號(hào) D．主機(jī)號(hào)、網(wǎng)絡(luò)號(hào)和類型號(hào)12．在下列有關(guān)ADSL技術(shù)及利用該技術(shù)接入因特網(wǎng)的敘述中，錯(cuò)誤的是 12 。 A．使用了Preserve子句的ReDim語(yǔ)句，只允許改變數(shù)組最后一維的上界 B．對(duì)于動(dòng)態(tài)數(shù)組， ReDim語(yǔ)句可以改變其維界但不可以改變其數(shù)據(jù)類型 C．Erase語(yǔ)句的功能只是對(duì)固定大小的數(shù)組進(jìn)行初始化 D．LBound函數(shù)返回值是指定數(shù)組某一維的下界25．以下關(guān)于過(guò)程的說(shuō)法中，錯(cuò)誤的是 25 。當(dāng)通項(xiàng)的絕對(duì)值小于107時(shí)停止計(jì)算，x的值由鍵盤(pán)輸入。 a(i) amp。 s End IfEnd Sub答案第一部分 信息技術(shù)基礎(chǔ)知識(shí)1．D 2．B 3．B 4．D 5．B 6．D 7．A 8．C 9．D 10．A11．B 12．A 13．A 14．C 15．C 16．B 17．C 18．A 19．A 20．C第二部分Visual Basic程序設(shè)計(jì)一、選擇題 二、填空題(1) 2 1 0(2) 1 0 1(3) 0 1 2(4) 6(5) 5(6) 31(7) 19(8) 68(9) 12345(10) 123(11) OVER(12) 5(13) Y6(14) Z9(15) A10(16) x 1 Or x 1(17) fx + a * t(18) a2 = a(19) 0 To 1(20) (i1)(21) scor = 0(22) Mid(Exact, j, 1) = Mid(anw, j, 1)(23) UBound(a)(24) Left 1(25) i 1(26) right = right 1(27) ch = Mid(str, i, 1)(28) (29) m = n Mod 2(30) s = 1 amp。 a(i) amp。Option ExplicitPrivate Sub Command1_Click() Dim n As Integer n = 5 Call test(n) Print nEnd SubPrivate Sub test(ByVal n As Integer) Dim i As Integer, s As String If n 0 Then For i = 1 To n s = s amp。 A．常用的信息系統(tǒng)開(kāi)發(fā)方法可分為結(jié)構(gòu)化生命周期方法、原型法、面向?qū)ο蠓椒ê虲ASE 方法等