visualbasic程序設(shè)計(jì)課程考核說(shuō)明(完整版)
【正文】 2．若窗體的左上角坐標(biāo)為（200，250），右下角坐標(biāo)為（300，150），則X軸的正向向右，Y軸的正向向 。 x 12寫(xiě)成Visual Basic邏輯表達(dá)式 。三、閱讀程序題（每小題5分，共20分）閱讀下列程序并寫(xiě)出程序運(yùn)行結(jié)果1．Private Sub Form_Click() Static Sum As Integer For I = 1 To 2 Sum = Sum + I Next I Print SumEnd Sub點(diǎn)擊窗體兩次后，變量Sum的值是：2．Private Sub Form_Click() Dim a,c As IntegerFor a=1 To 5 c=a+1 Print cNext aEnd Sub變量C的結(jié)果依次為：3．Private Sub Command1_Click() Dim A(1 To 5) As Integer Dim b As Integer For b = 1 To 5 A(b)=b Next b =A(b2)End Sub文本框Text1的結(jié)果是：4．Private Sub Command1_Click() =2 =3 =+ =Val()+Val() End Sub 文件框Text3和Text4的結(jié)果分別是：四、完善程序題（每題10分，共20分）1．程序運(yùn)行界面如圖1所示，要求在文本框Text1中任意輸入一個(gè)整數(shù)，判定該整數(shù)的奇偶性,程序如下，請(qǐng)補(bǔ)充完整。要求使用ADO對(duì)象和MSFlexGrid控件設(shè)計(jì)數(shù)據(jù)庫(kù)列表顯示程序。Server為服務(wù)器名稱(chēng) 39。如果還沒(méi)有建立與數(shù)據(jù)庫(kù)的連接，則用以下代碼創(chuàng)建。2．程序運(yùn)行后，單擊窗體，輸出結(jié)果為：63．程序運(yùn)行后，單擊Command1按鈕，文件框?qū)ο骉ext1的結(jié)果為：4 4．程序運(yùn)行后，單擊Command1按鈕，文件框?qū)ο骉extText4的結(jié)果分別為25四、完善程序題1．[1] Val() [2] x Mod 2 = 0[3] 奇數(shù)[4] End If[5]或者[1] Val() Mod 2 [2] x = 0[3] 奇數(shù)[4] End If[5]2．（1）New Recordset；（2）select * from students order by 學(xué)號(hào)；（3）；（4）New Connection；（5）strDB；五、編寫(xiě)程序題 Private Sub Command1_Click() Dim x As Single, y As Single x = Val() If x 100 Then y = x Else If x 200 Then y = * x Else If x 300 Then y = * x Else If x 500 Then y = * x Else y = * x End If End If End If End If = yEnd Sub13 / 13。連接SQL Server數(shù)據(jù)庫(kù) End If ReadFromTable 39。Password為登錄口令 39。表1學(xué)號(hào)姓名專(zhuān)業(yè)2004001張紅軟件專(zhuān)業(yè)2004003李強(qiáng)會(huì)計(jì)專(zhuān)業(yè)2004002王麗軟件專(zhuān)業(yè)圖1圖2程序如下，請(qǐng)補(bǔ)充完整。程序代碼如下：Private Sub Command1_Click() 39。表達(dá)式Not A=C Or 4*C = B^2 And BA+C的值為 。4．用Dim A(5,5)語(yǔ)句聲明二維數(shù)組后，數(shù)組A的元素共有 個(gè)。A、窗體設(shè)計(jì)器 B、代碼編輯器窗口 C、屬性窗口 D、工程資源管理器窗口2．窗體的Load事件的觸發(fā)時(shí)機(jī)是（ ）A、用戶(hù)單擊窗體時(shí) B、窗體被加載時(shí) C、窗體顯示之后
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1