题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-21 13:06:43

[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Command1的命令按钮,标题为“打开文件”,再画一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框。请按下列要求设置属性和编写代码:
①设置适当的属性,使用话框的标题为“打开文件”。
②设置适当的属性,使对话框的“文件类型”下拉列表框中有2个选项:“文本文件”、“所有文件”(如图1所示),默认的类型是“所有文件”。
[*]
③编写命令按钮的事件过程,使得单击按钮可以弹出打开文件对话框。
要求:程序中不得使用变量,事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。

更多"完成下列问题:在名称为Form1的窗体上画一个名称为Command1的"的相关试题:

[简答题]完成下列问题:
在名称为Form1的窗体上画一个命令按钮,名称为Command1,其标题为“移动本按钮”,如图2所示。
[*]
要求编写适当的事件过程,使得程序运行时,每单击按钮一次,按钮向左移动100。
要求:程序中不得使用变量,事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
[填空题]在名称为Form1的窗体上画一个名称为Text1的文本框,画一个名称为Command1的命令按钮。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。
请在空白处填上适当的内容,将程序补充完整。
Private Sub Command1_Click( )
Open "c:/test.dat" For Output As#1
For I=1 To Len(Text1.text)
(15) Next I
Ciose#1
End Sub
[简答题]在名称为Form1的窗体上建立一个名称为Command1,标题为“输出”的命令按钮,再建立一个名称为Text1的文本框,字体为四号常规黑体,编写适当的事件过程,要求程序运行后,如果单击“输出”命令按钮,则在文本框在上显示“模拟考试”,如下图左图所示。程序中不能使用任何变量,直接显示字符串。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj1.frm,工程文件名为sj1.vbp。
[简答题]在名称为Form1的窗体上添加一个名称为Command1的命令按钮,其标题为“移动本按钮”,如图所示。
要求编写适当的事件过程,使得程序运行时,每单击按钮一次,按钮向左移动100。
要求:程序中不得使用变量,事件过程中只能写入一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Label1、标题为“添加项目:”的标签;画一个名称为Text1的文本框,其中没有初始内容;画一个名称为Combo1的下拉列表框,并通过属性窗口输入若干项目(不少于3个,内容任意);再画两个命令按钮,名称分别为Command1、Command2,标题分别为“添加”、“统计”。运行时,向Text1中输入字符,单击“添加”按钮后,则Text1中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体上显示组合框中列表项的个数,如图3所示。请编写两个命令按钮的Click事件过程。
[*]
注意:程序中不得使用变量,也不能使用循环。存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
[简答题]完成下列问题:
在名称为Form1,标题为“显示记录”的窗体上画一个名称为Text1的文本框.其初始内容为空;再画一个名称为Command1的命令按钮数组(下标从0开始,有4个按钮,其对应的标题分别为“上一条记录”、“下一条记录”、“第一条记录”、“最后一条记录”),程序执行时的效果如图1所示,且程序执行时按下回车键则相当于鼠标单击“下一条记录”按钮。请设置相应的属性。
[*]
注意:存盘时,将文件保存至考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Label1、标题为“滚动条控件”的标签,一个名称为Hscroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最小值为1,最大值为100,滚动条的宽度为3000、高度为300,滚动块的初始位置为20。程序运行后的窗体如图1所示。
[*]
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.1frm。
[简答题]完成下列问题:
在标题为“列表框”、名称为Form1的窗体上画一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项采用复选框形式,如图1所示。列表框的宽为1100,高不限。
[*]
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Drive1的驱动器列表框、一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,一个名称为Label1、标题为“文件名”的标签和一个名称为Label2、BorderStyle为1的标签。窗体的标题没置为“文件系统控件”,如图1所示。请编写适当的程序,使得这3个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将选中的文件名显示在Label2中。
[*]
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Shape1的形状控件,位置在窗体的顶部,在属性窗口中将其设置为圆形。画一个名称为Timer1的计时器,在属性窗口中将其设置为不可用,时间间隔为0.5s,窗体如图2所示。请编写窗体的Load事件过程和计时器的事件过程,使得程序一开始运行.计时器即变为可用,且每隔0.5s形状控件向下移动100。
[*]
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
[单项选择]在启动窗体Form1上画一个名为Command1的命令按钮和两个文本框(其名称分别为Text1和Text2),新建一个窗体Form2。然后编写如下程序: Private Sub Command1_ Click( ) msg$ = "Retry" Title$ = "Error!" If Text1. Text = "a" And Text2. Text = "1" Then Unload Me Form 2. Show Else MsgBox msg$, vbOKOnly + vbCritical, Title$ End If End Sub运行该程序,要实现单击Command1命令按钮后卸载当前窗体,再弹出名为Form 2的窗体,则在两个文本框中应分别输入______ 。
A. a 1
B. a a
C. 1 a
D. 1 1
[简答题]完成下列问题:
在名称为Form1的窗体上画一个名称为Hscroll1的水平滚动条,其刻度范围为1~100;再画一个名称为Text1的文本框,初始内容为1。程序开始运行时,焦点在滚动条上。请编写适当的事件过程,使得程序运行时,文本框中实时显示滚动框的当前位置,运行情况如图2所示。
[*]
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
[填空题]在窗体上画一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个名称为 C1、标题为“存盘”的命令按钮,编写适当的事件过程。程序运行时,如果单击“存盘”命令按钮,则打开保存文件对话框,并把Text1中的内容按照在对话框中选定的路径和文件存盘。在刚打开对话框时的默认路径是“c: /my documents/”。请填空。 Private Sub C1_ Click( ) CD1. InitDir = CD1. FileName = "myflie.txt" CD1. Filter = “文本文件| ______” CD1. ______ = Open______ For Output As #1 Print #1, ______ Close #1 End Sub
[单项选择]在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签,两个名称分别为Conmmnd1和Com— mand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。 编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Left<Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是
A. 标签的移动方向为自右向左
B. 单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动
C. 当标签全部移出窗体后,将从窗体的另—端出现并重新移动
D. 标签按指定的时间间隔移动
[填空题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮, Form1窗体消失,显示Form2窗体,程序如下:   Private Sub Command1_Click( )    【 】     Form2 【 】    End Sub   试补充完整。

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码