1、打开工程文件st1.vbp,在窗体上从上到下添加两个文本框,名称分别为Text1Text2;再添加1个命令按钮,名称为Command1,标题为"选中字符数是"。程序运行时,在Text1中输入若干字符,选中部分内容后,单击"选中字符数是"按钮,则选中的字符个数显示在Text2(如图所示)。请编写按钮的Click事件过程。 要求:程序中不得使用变量,事件过程中只能写一条语句。按照原名保存文件,不得重新命名。
Private Sub Command 1_Click ()
Text 2=Text1.sellew
End Sub
2、打开工程文件st2.vbp,在窗体上添加一个名称为List1的列表框,通过属性窗口分别输入4个列表项:"数学""物理""化学""语文",如图所示。请编写适当的事件过程使得在程序运行时,将最后一个列表项自动改为"英语";单击窗体时,则删除最后一个列表项。注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。按照原名保存文件,不得重新命名。
Private Sub Form_Form()
List1.Remove Item List Count-1
Private Sub Form_Load()
List1.Add Item “英语”,4
3、打开工程文件st3.vbp,在窗体上添加一个命令按钮,名称为Command1,标题为"命令按钮"。然后建立一个菜单,标题为"控件",名称为menu0,包含两个子菜单顶,一个是"显示命令按钮",名称为menu1;另一个是"隐藏命令按钮",名称为menu2,如图所示。编写适当的事件过程,使得程序运行时,如果选择"显示命令按钮"菜单命令,则显示命令按钮;而如果选择"隐藏命令按钮"菜单命令,则隐藏命令按钮。
注意:程序中不得使用变量,每个事件过程中只能写一条语句。按照原名保存文件,不得重新命名。
Command 1.Visable=True/False
4、打开工程文件st4.vbp,在窗体上添加一个名称为Command1的命令按钮,标题为"打开文
",再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:
①设置适当属性,使对话框的标题为"打开文件"
②设置适当属性,使对话框的"文件类型"下拉式组合框中有两项可供选择:"文本文件""所有文件"(如图所示),默认的类型是"所有文件"
③编写命令按钮的事件过程,使得单击按钮可以弹出打开文件对话框。
要求:程序中不得使用变量,事件过程中只能写一条语句。按照原名保存文件,不得重新命名。
5、打开工程文件st5.vbp,在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为1250的正整数,并在窗体上显示出来。这样的数有多组,程序输出每组开头和结尾的正整数,并用“vb开始按钮代码~”连接起来,如图所示。最后将修改后的文件按原文件名存盘。
Private Sub Command1_Click()
Dim i As Integer,j As Integer,Sum As Integer
Print”连续和为1250的整数是:
For i = 1 To 500
Sum =0
For j = i To 500
Sum = 0
For j = i To 500
Sum = sum + j
If Sum >=1250 Then Exit For
Next
If Sum = 1250 Then
Print i;”~”;j
End If
Next
End Sub
6、打开工程文件st6.vbp,本题除了给出工程文件和相应的窗体文件外,还有一个名为的文本文件,其内容如下:
32  43  76  58  28  12  98  57  31  42  53  64  75  86  97  13  24  35  46  57  68  79  80  59  37
程序运行后单击窗体,将把文件中的数据输入到二维数组Mat中,按5行、5列的矩阵形式显示在窗体上,然后交换矩阵第二列和第四列的数据,将交换后的矩阵显示在窗体上,如图所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容(可以是多行),使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
a(i,2)=a(i,4)
a(i,4)=t
7、打开工程文件st7.vbp,本题窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已经给出了部分程序,其中计算偶数平方和的操作在通过过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()End Function之间填入你编写的若干语句。最后将修改后的文件按原文件存盘。
8、在考生文件夹下有一个工程文件st8.vbp,其功能是:
①单击"读数据"命令按钮,则将考生文件夹下in8.dat文件中的100个正整数读入数组a中,同
时显示在文本框Text1中;
②单击"素数"按钮,则将数组a中所有素数(只能被1和自身整除的数称为素数)存入数组b中,并将数组b中的元素显示在文本框Text2中。
在给出的窗体文件中已经有了全部控件(如图所示),但程序不完整。
要求:完善程序使其实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须先执行"素数"操作,然后再用窗体右上角的关闭按钮结束程序,否则将没有成绩。最后,程序按原文件名进行存盘。
9打开考生文件夹下文档WORD.DOCX,按照要求完成下列操作并以该文件名(WORD.DOCX)保存文档。
(1)将标题段("财经类公共基础课程模块化")文字设置为三号红黑体居中,并添加蓝双波浪下划线。
(2)将正文各段落("按照《高等学校……三种组合方式供选择。")文字设置为小四仿宋,行距设置为18磅,段落首行缩进2字符。
(3)在页面顶端居中位置输入页眉,小五号宋体,内容为"财经类专业计算机基础课程设置研究"
(4)将文中后8行文字转换为一个85列的表格;设置表格居中,表格第2列列宽为5厘米,其余列列宽为2厘米,行高0.6厘米,表格中所有文字中部居中。
(5)设置表格所有框线为1磅红单实线;计算合计行"讲课""上机""总学时"的合计值。

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。