资源描述：
《2008秋程序设计基础(vb)重修复习》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、高级语言程序设计重修复习1一、基本概念1.VB6.0是32位操作系统下的应用程序的开发工具。2.在VB中，工程文件的扩展名：.VBP；窗体文件的扩展名：.FRM；标准模块文件的扩展名：.BAS；可执行文件的扩展名：.EXE。3.在VB集成环境中，系统的工作状态有设计态、运行态和中断态三种。4.使用ListCount属性，可获得列表框的项目总数。5.Timer对象在运行时一定是不可见的。6.VB作为容器的对象有：Form、PictureBox、Frame。7.一般情况下，SetFocus方法不能用在Form_Load()过程中。8.窗体Form1的Name属性是frm1，它的Lo
2、ad事件过程是Form_Load。9.当对象具有焦点时，可接收用户的输入。10.窗体的Caption属性用来设置将出现在窗体标题栏中的标题。11.复选框的Value属性取值为0、1、2，选项按钮的取值为：True与False。12.对象的绝大多数属性既可以在属性窗口中进行设置也可以在程序代码中进行改变，但有些属性只能在属性窗口中进行设置（如文本框的多行属性），有些属性只能在程序代码中改变（如：ListCount属性）。13.文本框有Text属性没有Caption属性。14.滚动条没有Value属性。15.若要给文本框设置滚动条属性，只有在多行属性为True9时才有效。16.当选
3、项按钮被选中时，其Value属性值为True。17.Timer控件的Interval属性值是指时间间隔，单位为毫秒（千分之一秒）。18.有语句Dima,bAsInteger，变量b的类型和初值是Integer、0，a为变体型，初值为空。19.#5/20/1999#表示日期常量。20.在VB中，长整型用4B表示，整形用2B表示。21.函数Mid("ABCDEFGH",3,3)的值是CDE。22.在For—Next循环中，循环变的初值、终值、步长在循环体中被改变，不会改变循环次数。23.函数Cint(4.5)的值为4，Cint(5.5)的值为6。24.三种基本结构是顺序结构、选择结
4、构和循环结构。25.For—Next循环和Do—LooP循环可以相互嵌套。26.使用ReDim语句动态地定义数组大小时，带参数Preserve可以保留数组元素以前的值。27.任何类型的变量均可作为形参（错，定长字符型变量不可以作为形参）。28.VB中有两种类型的数组：固定大小数组和动态数组。29.二维数组在内存中按列存放。30.VB中使用的过程分为子程序过程、函数过程和属性过程。9二、程序分析题1.结果为：12904PrivateSubForm_Click()DimxAsInteger,yAsInteger,nAsIntegerx=0y=0Dox=x+3y=y+x*3n=n+1
5、LoopUntilx>9PrintxPrintyPrintnEndSub2.结果为：8867867458674523OptionExplicitPrivateSubForm_Click()DimsAsString,s1AsString,s2AsStringDimiAsIntegers1="12345678"Fori=Len(s1)To1Step-2s2=Mid(s1,i,2)s=s&s2PrintsNextiEndSub3.结果为：111121133114641OptionExplicitPrivateSubForm_Click()Dima(6,6)AsInteger,iAsI
6、nteger,jAsIntegera(1,1)=1Fori=2To6a(i,1)=1Forj=2Toi-1a(i,j)=a(i-1,j-1)+a(i-1,j)Nextj9a(i,i)=1NextiFori=1To6Forj=1ToiPrinta(i,j);NextjPrintNextiEndSub4.结果为：421753986OptionExplicitPrivateSubForm_Click()Dima(3,3)AsInteger,iAsIntegerDimkAsInteger,nAsIntegerFork=1To5Ifk>=3ThenFori=1To6-kn=n+1a(k-
7、3+i,i)=nNextiElseFori=kTo1Step-1n=n+1a(k-i+1,3-i+1)=nNextiEndIfNextkFork=1To3Fori=1To3Printa(k,i);NextiPrintNextkEndSub5.结果为：1934101OptionExplicitPrivateSubForm_Click()DimmAsInteger,nAsIntegerm=1:n=2Printm+n+fun1(m,n)9m=2:n=1Printfun1(m,n)+fun1(m,n
