【文章內(nèi)容簡介】
、 等三種不返回結(jié)果集的SQL語句。 答案:增加 刪除 修改 14.設(shè)StrSQL、Str1為字符串變量,其中Str1的值為”001”,那么執(zhí)行賦值語句StrSQL=”Select * from Table1 Where 學(xué)號(hào)=’”+Str1+”’”后,StrSQL的值等于 。答案: Select * from Tabel1 Where 學(xué)號(hào)=’001’15.在VB中,將Foxpro稱為外部數(shù)據(jù)庫,Access稱為 ,SQL Server稱為 。 答案:本地?cái)?shù)據(jù)庫 遠(yuǎn)程數(shù)據(jù)庫 三、程序設(shè)計(jì)題1. Private Sub Form_Click() Static Sum As Integer For I = 1 To 100 Sum = Sum + I Next I Print SumEnd Sub答案:5050 2. Private Sub Form_Click() A = 10: b = 15: c = 20: d = 25 Print A。 Spc(5)。 b。 Spc(7)。 c Print A。 Spc(8)。 b。 Space$(5)。 c Print c。 Spc(3)。 +。 Spc(3)。 d。 Print Spc(3)。 =。 Spc(3)。 c + dEnd Sub 答案:說明:一行中有多個(gè)語句時(shí)各語句之間需要插入冒號(hào)“:”;Spc(n) 用來在輸出中插入空白字符,n為空白字符數(shù);逗號(hào)“,”分界符分隔要顯示的多個(gè)項(xiàng)目,每個(gè)項(xiàng)目之間距離一個(gè)制表符(TAB);分號(hào)“;”表示所有的項(xiàng)目并列顯示(盡管下一個(gè)Print語句已經(jīng)換行),中間沒有空格 3. Private Sub Form_Click() For i% = 1 To 3 For j% = 1 To i Print LTrim(Str(i%)) + * + LTrim(Str(j%)) + =。 i% * j%。 Next j% Print Next i%End Sub答案: 4. Private Sub Command1_Click() Dim a, b As Integer a = b = = a = bEnd Sub答案:,Text2顯示3。如下圖所示。 5. Private Sub Form_Click() For i = 1 To 5 Print Tab(11 i)。 For J = 1 To i * 2 1 Print *。 Next Next iEnd Sub 答案:四、程序設(shè)計(jì)題1.在窗體上建立一個(gè)驅(qū)動(dòng)器列表、目錄列表框、文件列表框、圖片框。要求程序運(yùn)行后,驅(qū)動(dòng)器列表框Drive1的默認(rèn)驅(qū)動(dòng)器設(shè)置為C盤,選擇File1中所列的圖片文件(*.bmp和*.jgp),則相應(yīng)的圖片顯示在圖片框Picture1中。程序運(yùn)行結(jié)果如圖10所示。答案:程序代碼:Private Sub Form_Load() 39。設(shè)置控件的有效狀態(tài) = True = True = True 39。設(shè)置過濾器 = *.jpg 39。設(shè)置控件的初始驅(qū)動(dòng)器 = g