首页 > 自考
题目内容 (请给出正确答案)
[主观题]

在名为Form1的窗体上绘制一个文本框,其名称为Text1,初始内容为空白;然后再绘制3个单选按钮,其名

称分别为Opt1、Opt2和Opt3,标题分别为“体育”、“音乐”和“美术”。编写适当的事件过程,使程序运行后,若选择单选按钮“体育”,则在文本框中显示“90”:如果选择单选按钮“音乐”,则在文本框中显示“89”;如果选择单选按钮“美术”,则在文本框中显示“80”。程序的运行情况如下图所示。

在名为Form1的窗体上绘制一个文本框,其名称为Text1,初始内容为空白;然后再绘制3个单选按钮,

注意:

程序中不得使用变量,事件过程中只能写一条语句:文件必须存放在考生文件夹中,工程文件名为execise76.vbp,窗体文件名为execise76.frm。

查看答案
答案
收藏
如果结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能还需要:
您的账号:
发送账号密码至手机
发送
安装优题宝APP,拍照搜题省时又省心!
更多“在名为Form1的窗体上绘制一个文本框,其名称为Text1,…”相关的问题
第1题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1) 在名称为Form1的窗体上画一个名称为H1

注意:下面出现的“考生文件夹”均为c:\wexam\25160001。

(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在“属性”窗口中设置它的属性值,使之满足以下要求:它的最大刻度值为100,最小刻度值为1,在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图19-1所示。

注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm

(2) 在名称为Form1的窗体上画两个文本框,名称分别为Text1和Text2,均无初始内容;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个子菜单项,名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程,使得程序运行时,单击“复制”菜单项,则把 Text1中的内容复制到Text2中,单击“清除”菜单项,则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。

注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

注意:下面出现的“考生文件夹”均为c:wexam25160001。 (1) 在名称为Form1的

点击查看答案
第2题
在名称为Form1的窗体上建立一个名称为Listl的列表框。在程序运行后,通过Form. _Load事件过程加载
窗体时,执行语句Listl.AddItem“Item1”和List1.Addltem“Item2”,每当单击列表项时,就将执行语句List1.AddItem List1.Text一次,如图6-2所示。在名称为Form1的窗体上建立一个名称为Listl的列表框。在程序运行后,通过Form. _Load注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。

点击查看答案
第3题
编写一过程将C盘中的Config.sys文件内容读出,并在文本框中显示出来。在窗体Form1上建立一个文本框
Text1,将其MultiLine属性设置为True,ScrollBars属性设置为3-Both。给定的程序不完整,请将程序补充完整。 Option Explicit Private Sub Form. _Click() Dim ch1 As String,fn As Integer Dim Str As String fn=【 】 Open "C:\Config.sys" For Input As fn Do While Not EOF(【 】) Line Input fn, ch1 Str = Str + chl+ vbCrLf Loop Text1.Text =【 】 End Sub

点击查看答案
第4题
在考生文件夹下有一个数据库文件“samp2.accdb”,其中存在已经设计好的3个关联表对象“tStud”、“tCou
rse”、“tScore”和一个空表“tTemp”。此外,还提供窗体“tTest”和宏“reTest”,请按以下要求完成设计。

(1)创建一个查询,查找女学生的“姓名”、“课程名”和“成绩”3个字段的内容,将查询命名为“qT1”。

(2)创建追加查询,将表对象“tStud”中有书法爱好的学生的“学号”、“姓名”和“入校年”3列内容追加到目标表“tTemp”的对应字段内,将查询命名为“qT2”。(规定:“入校年”列由“人校时间”字段计算得到,显示为4位数字形式。)

(3)补充窗体“tTest”上“testl”按钮(名为“bt1”)的单击事件代码,实现以下功能:

打开窗体,在文本框“tText”中输入一段文字,然后单击窗体“tTest”上的“testl”按钮(名为“bt1”),程序将文本框内容作为窗体中标签“bTitle”的标题显示。

注意:不能修改窗体对象“fTest”中未涉及的控件和属性:只允许在“*****Add*****”与“*****Add*****”之间的空行内补充语句,完成设计。

(4)设置窗体“iTest”上“test2”按钮(名为“bt2”)的单击事件为宏对象“reTest”。

点击查看答案
第5题
设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_Load() Show Text1.Tex

设窗体上有一个名为Text1的文本框,并编写如下程序:

Private Sub Form_Load()

Show

Text1.Text = ""

Text1.SetFocus

End Sub

Private Sub Form_MouseUp(Button As Integer, _

Shift As Integer, X As Single, Y As Single)

Print "程序设计"

End Sub

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

Print "Visual Basic";

End Sub

程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗体上显示的内容是()。

A.Visual Basic

B.程序设计

C.Visual Basic程序设计

D.a程序设计

点击查看答案
第6题
编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本
框Text1,将其MultiLine属性设置为True,将ScrollBars属性设置为3-Both。根据题意。请完善下列程序。 option Explicit Private Sub Form. C1ick() Dim chl As String, fn As Integer Dim Str As String fn=【 】 Open "C:\Config. sys" For Input As fn Do While Not EOF(【 】) Line Input fn, chl Str=Str+chl+vbCrLf Loop Text1. Text=【 】 End Sub

点击查看答案
第7题
在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编
写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是()。

A.Private Sub Text1_Change()

Command1.Caption = "计算机等级考试"

End Sub

B.Private Sub Command1_ Click ()

Caption = "计算机等级考试"

End Sub

C.Private Sub Form1_ Click ()

Text1.Caption = "计算机等级考试"

End Sub

D.Private Sub Command1_ Click ()

Text1.Text = "计算机等级考试"

End Sub

点击查看答案
第8题
在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的Muhiline属性设置为
True,然后编写如下的事件过程: Private Sub Form_Click() Open“d:\test\smText1.txt"For lnput As1 Do While Not【 】 Line lnput1,aspect$ whole$=wholes+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close1 Open“d:\test\smtexttxt"For Output As 1 Print 1,【 】 Close1 End Sub 上述程序的功能是,把磁盘文件,mText1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtexttxt。请填空。

点击查看答案
第9题
现有一个已经建好的“fQuer;,”窗体,如下图所示。运行该窗体后,在文本框(文本框名称为tName)中输入

现有一个已经建好的“fQuer;,”窗体,如下图所示。运行该窗体后,在文本框(文本框名称为tName)中输入要查询的医生姓名,然后单击“查询”按钮,即运行一个名为“qT4”的查询。“qT4”查询的功能是显示所查医生的“医生姓名”和“预约人数”两列信息,其中“预约人数”值由“病人ID”字段;范计得到,请设计“qT4”查询。现有一个已经建好的“fQuer;,”窗体,如下图所示。运行该窗体后,在文本框(文本框名称为tName

点击查看答案
第10题
在考生文件夹中有一个工程文件execise31.vbp(相应的窗体文件为execise31.frm)。窗体Form1上有两个

在考生文件夹中有一个工程文件execise31.vbp(相应的窗体文件为execise31.frm)。窗体Form1上有两个标签Lab1和Lab2,标题分别为“密码”和“允许次数”;一个命令按钮Cmd1:标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入密码(输入时,显示“*”),无初始内容,Text2的初始内容为3。已给出了Cmd1的事件过程,但不完整,要求去掉程序中的注释符“'”,把程序中的问号“?”改为正确内容,使得在运行时,在Text1中输入密码后,单击“确定”按钮,如果输入的是“abcdef”则在Text1中显示“密码正确”;如果输入其他内容,单击“确定”后,弹出如下图所示的错误提示对话框,并且Text2中的数字减1。最多可输入3次密码,若3次都输入错误,则禁止再次输入。

在考生文件夹中有一个工程文件execise31.vbp(相应的窗体文件为execise31.frm)

注意:

不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

点击查看答案
第11题
开始窗体中有一个名为Txet0的文本框,将此文本框作为密码框,条件宏中设置其密码为111,则应该在条件宏的条件中设置表达式()。

A.[Forms]![开始窗体]![Text0]=111

B.[Forms]![开始窗体]![Text0]="111"

C.[Text0]=[111]

D.Text0="111"

点击查看答案
退出 登录/注册
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改