在名称为Forml的窗体上绘制一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设
Private SUb Form_CnCk()
Open"d:\tes\smtext1.txt"For Input AS 1
Do While Not EOF(1)
Line Iput 1,aspect$
whole$=whole$+aspect$+Chf$(13)+Chr$(10)
Loop
Private SUb Form_CnCk()
Open"d:\tes\smtext1.txt"For Input AS 1
Do While Not EOF(1)
Line Iput 1,aspect$
whole$=whole$+aspect$+Chf$(13)+Chr$(10)
Loop
第2题
Private Sub Form_Activate()
Forj=1 to 3
x=3
ForI=1 to 2
x=x+6
NextI
Nextj
Print x
End Sub
程序运行后,窗体上显示的结果为上______。
第3题
下面程序的运行结果是 ______ 。程序的功能是 _______ 。
Public Function myfun(m,n)
Do while m>n
Do while m>n:m=m-n:Loop
Do While n>m:n=n-m:Loop
Loop
Myfun=m
End Function
Private Sub Command1_Click()
Print myfun(15,15)
End Sub
第4题
文本,完成下列程序。
Private Sub Form_Load()
Check1.Caption="显示粗体"
Check2.Caption="显示斜体"
Text1.Text="Visual Basic6.0"
End Sub
Private Sub Check1_Click()
If _______=1 Then
Text1.FontBold=True
Else
Text1.FontBold=False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value=1 Then
Text1. ______ =True
Else
Text1. _____ =False
End Sub
第5题
本框,它们的初始内容为空:一个标题为“升序排列”的命令按钮,其功能是通过调用过程Sort将数组按升序排序。请装入该文件。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可使数组按升序排序,并在文本框中显示出来(如下图所示),同时将其平均值在窗体标题上显示。
这个程序不完整,请把它补充完整,并能正确运行。
要求:
去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
第6题
组合梃只能用于选择操作,不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项,如图5(a)所示,单击“输入正整数”按钮,通过输入对话框输入一个正整数,再单击“判断”按钮,则按照选定的选项内容,将判断结果显示在信息框中。如图5(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。 在给出的窗体文件中已经有了全部控件,但程序不完整,要求:按照题目要求设置组合框的 有关属性,去掉程序中的注释符,把程序中的?改为正确的内容。 、 注意:考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生目录下有一个工程文件sjt4.vbp。窗体上有一大一小两个名称分别为Shape2、Shape1的Shape控件。请在属性窗口中将Shape1控件设置为圆形,并将其颜色设置为红色(颜色值为&H000000FF&),如图6所示。 要求:当单击窗体时,Shape1移动到矩形(即 Shape2)左上角,再次单击窗体,则Shapel移动到矩形的右下角。在给出的窗体文件中已经有了全部控件,但程序不完整。要求:在属性窗口中设置有关的属性值,去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的乓他部分和控件属性。最后把修改后的文件按原文件名存盘。
第7题
Form1的窗体上画一个名称为List1列表框,通过属性窗 口输入四个列表项:“数学”、“语文”、“历史”、“地理”,列表项采用“复选框形式”,如图2所示。列表框的宽为1100高不限。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。 (2)在名称为Form1的窗体上建立一个名称为“menu1”、标题为“文件”的弹出式菜单,含有三个菜单项,它们的标题分别为“打开”、“关闭”、“保存”,名称分别为“m1”、“m2”、“m3 YYo 再画一个命令按钮,名称为“Command1”、标题为“弹出菜单”。要求:编写命令按钮的Click事件过程,使程序运行时单击“弹出菜单”按钮即可弹出“文件”菜单(如图3所示)。 注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
第8题
出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图3(a)所示。通过属性窗口设置各命令按钮的属性,使得程序开始运行时,“停止”按钮不可见,“退出”按钮不可用,如图3(b) 所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。(2)在名称为Form1的窗体上画两个名称分别为Command1和Command2、标题分别为“打开”和“保存”的俞令按钮,和一个名称为CD1的通用对话框,如图4所示。请在属性窗口中设置CD1的属性,使得打开通用对话框时,其初始路径是“C:\”。再编写适当的事件过程,使得运行程序,分别单击“打开”或“保存”按钮时,相应地出现“打开”或“保存”对话框。要求程序中不得使用变量,每个事件过程中只能写一条语句。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
第9题
组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。 已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。 注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
第10题
在名为Form1的窗体上绘制一个名为Image1的图像框,利用属性窗口装入考生文件
夹中的图像文件Pic1.bmp,并设置适当属性使其中的图像可以适应图像框大小;再绘制两个命令按钮,名称分别为Cmd1、Cmd2,标题分别为“右移”、“下移”。请编写适当的事件过程,使得在运行时,每单击“右移”按钮一次,图像框向右移动100:每单击“下移”按钮一次,图像框向下移动100。运行时的窗体如下图所示。
注意:
程序中不得使用变量,事件过程中只能写一条语句;文件必须存放在考生文件夹中,工程文件名为execise34.vbp,窗体文件名为execise34.frm。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!