在考生文件夹下有一个工程文件execise28.vbp,相应的窗体文件为execise28.frm,此外还有一个名为in28.txt的文本文件,其内容如下:132423365858169854531442522473269122637545760728051327。程序运行后单击窗体,将把文件in28.txt中的数据输入到二维数组Mat中,在窗体上按5行、5列的矩阵形式显示出来,然后交换矩阵第2列和第3列的数据,并在窗体上输出交换后的矩阵,如下图所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容(可以是多行),使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名保存。
通过设置何属性可以改变所画图形的形状?
在考生文件夹中有一个工程文件execise38.vbp,相应的窗体文件名为execise38.frm。在名为Form1的窗体中有一个组合框和一个命令按钮,如下图所示。程序的功能是:在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示:“此项已存在”,然后清除输入的内容。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的属性。最后原名保存修改后的文件。
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer,i AS Integer arr1=Array(12,435,76,-24,78,54,866,43) Min=arr1(1) For i=2 To 8 If arr1(i)<Min Then______ Next i Print "最小值是:"; Min End Sub
在下面栈的基本运算中,不是加工型运算的是______。
(1)在窗体上画三个复选框,名称分别为chl、Ch2和ch3,标题分别为“体育”、“音乐”和“美术”,还有一个命令按钮,名称为Cl,标题为“显示”。要求程序运行后,如果选中某个复选框,当单击“显示”命令按钮时,则显示相应的信息。例如,如果选中“体育”和“美术”复选框,单击“显示”命令按钮后,在窗体上显示“我的爱好是体育美术”,如图3—4所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.vbp。(2)在考生文件夹中有工程文件sj4.vbp及窗体文件sj4.frm。在名为Form1的窗体上有一个标签数组,名为Lab1,该数组有4个控件元素,标题分别是“Wait、“Edit、“Aix”和“Move”,如图3—5所示。在程序运行后,将鼠标指针移动到各控件元素上,则鼠标指针的形状将变成各控件元素的标题所代表的鼠标指针形状;离开控件元素,则鼠标指针又变成正常情况下的箭头形状。本程序不完整,请补充完整,并能正确运行。注意:去掉程序中的注释符(即“'”号),把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click()a=InputBox("请输入日期(1~31)")t="旅游景点:" &IIf(a>0 And a<=10,"长城","") & _IIf(a>10 And a<=20,"故宫","") & IIf(a>20 And a<=31,"颐和园","")Text1.Text=tEnd Sub程序运行后,如果从键盘上输入16,则在文本框中显示的内容是
窗体上有一个名称为Listl的列表框,一个名称为Textl的文本框,一个名称为Labell、Caption属性为“Sum”的标签,一个名称为Commandl、标题为“计算”的命令按钮。程序运行后,将把1~100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮,则对listl中的数进行累加求和,并在文本框中显示计算结果,如图所示。以下是实现上述功能的程序,请填空。PrivateSubFormLoad()Fori=1To100IfiMod?=0ThenEndIfNextEndSubPrivateSubCommandlClick()Sum=0Fori=0ToSum=Sum+NextTextl.Text=SumEndSub
下列______是日期型常量。
对关系s和关系R进行集合运算,结果中既包含关系S中的所有元组也包含关系R中的所有元组,这样的集合运算称为( )。
在窗体上画一个文本框和—个图片框,然后编写如下两个事件过程: Private Sub Form_Click() Text1.Text="VB程序设计" End SubPrivate Sub Textl Change() Picture1.Print"VB programming" End Sub 程序运行后,单击窗体,则在文本框中显示的内容是【 】,而在图片框中显示的内容是【 】。
在窗体上画一个命令按钮,然后编写如下代码: Private Sub Commandl_Click() Dim MaxSize,NextChar,MyChar Open“d:\temp\female.txt”For Input As#1 MaxSize=LOF(1) For NextChar=MaxSize To 1 Step-1 Seek#1.NextChar MyChar=Input(1,#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为( )。
在窗体Form1上建立3个菜单(名称分别为Read、Calc和Save,标题分别为“读数”、“计算”和“存盘”),然后绘制一个文本框(名称为Text1,MulfiLine属性设置为Tree,ScrollBars属性设置”2),如下图所示。程序运行后,如果执行“读数”命令,则读入in12.txt文件中的100个整数,放入一个数组中,数组的下界为1:如果执行“计算”命令,则把该数组中大于等于30的元素在文本框中显示出来,求出它们的和并把所求得的和在窗体上显示出来;如果执行“存盘”命令,则把所求得的和存入考生文件夹下的out12.txt文件中。在考生文件夹下有一个工程文件execise12.vbp(相应的窗体文件为execise12.frm),考生可以装入该文件。窗体文件中的ReadData过程可以把in12.txt文件中的100个整数读入Arr数组中;而WriteData过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得,文件名为out12.txt)。注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍为execise12.vbp,窗体文件名仍为execise12.frm。
在名称为Forml的窗体画两个Label控件,名称分别为Labell和Label2,其中Labell中显示“总人数”,Label2中显示“平均分”,两个名称分别为Textl和Text2的文本框,再画两个命令按钮,名称分别为Commandl与Command2,标题分别为“读取数据”与“计算平均分”,数据文件in5.txt存放成绩。要求程序运行后:单击“读取数据’’按钮后,从考生文件夹下的in5.txt中读出数据,并在标签Textl中显示人数;单击“计算平均分”则在Text2中显示平均分并将结果写入考生文件夹下out5.txt文件中;执行完毕,“读取数据”按钮变成“读取完成”,且无效(变灰),如图21—5所示。注意:在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,请在有“?”号的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹,程序编写完整后执行一次操作,将结果保存到考生文件夹下的out5.txt文件中,否则没有成绩。
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2,它们都显示垂直滚动条和水平滚动条,都可以显示多行文本;再绘制一个命令按钮,名为Cmd1,标题为Copy如下图所示。请编写适当的事件过程,使得程序在运行时,在Text1中输入多行文本后,单击Copy按钮,就把Text1中的文本全部复制到Text2中。注意:程序中不得使用任何变量;文件必须存放在考生文件中,工程文件名为execise14.vbp,窗体文件名为execise14.frm。
在考生的文件夹下有一个工程文件execise57.vbp,相应的窗体文件为execise57.frm。在窗体Form1上有两个命令按钮,其名称分别为Cmd1和Cmd2,标题分别为“文件写入”和“文件读出”,如下图所示。其中“文件写入”命令按钮事件过程用来建立一个通讯录,以随机存取方式保存到文件out57.txt中;而“文件读出”命令按钮事件过程用来读出文件out57.txt中的每个记录,并在窗体上显示出来。通讯录中的每个记录由3个字段组成,结构如下:姓名(Name)电话(Tel)邮政编码(Pos)Abcd(010)51688765100065┆ ┆ ┆各字段的类型和长度为:姓名(Name):字符串15电话(Tel):字符串15邮政编码(Pos)长整型(Long)程序运行后,如果单击“文件写入”命令按钮,则可以随机存取方式打开文件out57.txt,并根据提示向文件中添加记录,每写入一个记录后,都要询问是否再输入新记录,回答“Y”(或“y”)则输入新记录,回答“N”(或“n”)则停止输入;如果单击“文件读出”命令按钮,则可以随机存取方式打开文件out57.txt,读出文件中的全部记录,并在窗体上显示出来。该程序不完整,请把它补充完整。要求:(1)去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。(2)文件out57.txt中已有3个记录,请运行程序,单击“文件写入”命令按钮,向文件out57.txt中添加以下2个记录(全部采用西文方式),如下图所示。Abcd(010)51688765100065Efgh(010)51684321100044(3)运行程序,单击“文件读出”命令按钮,在窗体上显示全部记录。(4)用原来的文件名保存工程文件和窗体文件。
在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名称为Option1。程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换。请填空。 Private Sub Option1_Click(Index As Integer) Select Case【 】 Case 0 a=“宋体” Case 1 a=“黑体” Case 2 a=“楷体GB2312” End Select Text1.【 】=a End Sub
在名为Form1的窗体上建立两个主菜单,其标题分别为“文件”和“帮助”,名称分别为vbFi1e和vbHe1p,在“文件”菜单下有3个菜单项,分别为“新建”、“打开”和“保存”(其名称分别为vbNew、vbOpen和vbSave)。要求程序运行后,如果选中“文件”下的某个菜单项,则将该菜单项的标题通过MsgBox对话框显示出来,如下图所示。注意:文件必须存放在考生文件夹中,窗体文件名为execise47.frm,工程文件名为execise47.vbp。
如果准备读文件,打开随机文件“text.dat”的正确语句是( )。
在名称为Forml的窗体上有一个Label控件和两个命令按钮,数据文件personl.dat存放员工的编号、姓名、工资。自定义一个数据类型person,字符型数据定长为12;按“开始”按钮后,从考生文件夹下的personl.dat中读出所有数据并写人考生文件夹下的person.dat文件中;执行完毕,“开始”按钮变成“完成”,且无效(变灰),如图39—6所示。注意:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容。考生的工程文件以文件名sj5.vbp存盘,窗体文件以文件名sj5.frm存盘。
