1.结构化程序设计的三种基本逻辑结构为顺序、选择和【1】。
2.冒泡排序算法在最好的情况下的元素交换次数为【2】。
3.软件结构是以【3】为基础而组成的一种控制层次结构。
4.在面向对象的设计中,用来请求对象执行某一处理或回答某些信息的要求称为【4】。
5.关系数据库的关系演算语言是以【5】为基础的DML语言。
6.要使工具栏控件的某按钮呈按钮菜单的样式,可以在其属性页中设置其【6】选项为5-tbrDropDown。
7.在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub Examda提示:程序运行后,单击命令按钮,两个文本框中显示的内容分别为【7】和【8】。
8.下面的程序代码实现将一个一维数组中元素向右循环移动,移动次数由文本框Textl输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。 Private Sub MoveRight(x()As Integer) Dim i As Integer Dim j As Integer Dim k As Integer i=UBound(x) j=x(i) For k=i To【9】Step-1 【10】 Next k x(LBound(x))=j End Sub Private Sub Command1_Click() Dim a(10) As Integer Dim i As Integer Dim j As Integer Dim k As Integer For i=0 To 10 a(i)=i Next i j=Val(Text1.Text) k=0 Do k=k+1 Call MoveRight(a) Loop Until k=j For i=0 To 10 Print a(i); Next i End Sub 9.下面程序是用来打印九九乘法表的,请填空。 Private Sub Form_Click() Dim flag As Integer,i As Integer,j As Integer,Str1 $ Str1=“” For i=1 To 9 【11】 For j=1 To 9 If 【12】Then str1=str1+Str$(j)+“*”+Str$(i)+“=”+Str$(Val(i*j)) Else str1=str1 & Chr(13) Exit For End If Next j Next i Print str1 End Sub
10.把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入另一个磁盘文件,请填空完成程序。在窗体上建立一个文本框,在属性窗口中把该文本框的MultiLine属性设置为True,Examda提示:然后编写如下的事件过程: Private Sub Form_Click() Open癉:\ test1.txt”For Input As # 1 Text1.FontSize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【13】 whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=【14】 Close Open“D:\ test2.txt”For Output As # 1 Print # 1,【15】 Close End Sub
参考答案 1.【1】重复(或循环) 2.【2】0 3.【3】模块 4.【4】消息 5.【5】谓词演算 6.【6】样式 7.【7】ABCD 【8】VB Programming 8.【9】LBound(x)+1 【10】x(k)=x(k-1) 9.【11】Flag=i 【12】j<Flag 10.【13】Line Input # 1,aspect$ 【14】Whole$ 【15】Text1.texthttp://ks.examda.com
|