首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,名称为Text1,字体为“黑体”,文本框中的初始内容为“程序设计”;再画一个命令按钮,名称为C1,标题为“改变字体”(如
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,名称为Text1,字体为“黑体”,文本框中的初始内容为“程序设计”;再画一个命令按钮,名称为C1,标题为“改变字体”(如
admin
2018-10-29
59
问题
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框,名称为Text1,字体为“黑体”,文本框中的初始内容为“程序设计”;再画一个命令按钮,名称为C1,标题为“改变字体”(如图1-31 所示)。请编写适当事件过程,使得在运行时,单击命令按钮,则把文本框中文字的字体改为“宋体”。程序中不得使用任何变量。
注意:保存时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画一个图片框,名称为P1,高为1800,宽为1600,并放入文件名为pic1.bmp 的图片(如图1-32 所示)。请编写适当的事件过程,使得在运行时,如果双击窗体,则图片框中的图片消失。程序中不得使用任何变量。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置相应属性。 步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() Me.Text1.Font.Name = "宋体" End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:打开代码编辑窗口,编写窗体的双击事件过程。 参考代码: Private Sub Form_DblClick() P1.Picture = LoadPicture("") End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/RtFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下选项中,不合法的VisualBasic的变量名是( )。
假定在窗体上添加了一个通用对话框控件,其名称为CD1,并有如下程序段:CD1.ShowOpenCD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件,则FileTitle属性的值是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
能够用于标识对象名称的属性是( )。
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk
软件设计中模块划分应遵循的准则是
工程中有Form1、Form2两个窗体(Forml中有文本框Text1,Form2中有Text1文本框和command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateS
随机试题
往复泵的第一特征代号QS表示输水气(汽)动泵,QY表示()。
一个时期某一阶层或某一行业的人群对文化问题所持的态度和看法,或在某一文化事象里所表现的意识形态,称作______。
上胡不法先王之法?非不贤也,为其不可得而法。先王之法,经乎上世而来者也,人或益之,人或损之,胡可得而法?虽人弗损益,犹若不可得而法。凡先王之法,有要于时也。时不与法俱在,法虽今而在,犹若不可法。故择先王之成法,而法其所以为法。先王之所以为法者,何也
在RIA中,放射强度测定所用的单位是
患者,男,23岁。因左上第二磨牙龋洞,一次性充填后出现冷热痛,无迟缓性痛,无自发痛。以下哪项不是造成患牙冷热痛的原因
(2010年)若希望实现三相异步电动机的向上向下平滑调速,则应采用()。
理财产品A的期望收益率是(),方差是()。理财产品A和B的收益率的协方差是{)。
小王是某商品流通企业的配送员工,他的薪酬计量更适合采用()工资的形式。
下列各类资产发生减值后,相关资产减值准备允许转回的有()。
Hewasanundersizedlittleman,withaheadtoobigforhisbody—asicklylittleman.Hisnerveswerebad.Hehadskintroubl
最新回复
(
0
)