首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明以及用Visual Basic语言编写的程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【应用4.1】 设应用程序的运行窗口内有一个文字标签(Label)以及一个框架,其中有三个复选框(chk1,chk2,chk3),各个复选
阅读以下应用说明以及用Visual Basic语言编写的程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【应用4.1】 设应用程序的运行窗口内有一个文字标签(Label)以及一个框架,其中有三个复选框(chk1,chk2,chk3),各个复选
admin
2012-12-10
48
问题
阅读以下应用说明以及用Visual Basic语言编写的程序代码,将应填入(n)处的字句写在答题纸的对应栏内。
【应用4.1】
设应用程序的运行窗口内有一个文字标签(Label)以及一个框架,其中有三个复选框(chk1,chk2,chk3),各个复选框单击事件过程的程序代码如下:
Private Sub chkl_Click()
Label.fontBold=chkl.Value
End Sub
Private Sub chk2_Click()
Label.fontltalic=chk2.Value
End Sub
Private Sub chk3_Click()
Label.fontUnderLine=chk3.Value
End Sub
三个复选框chkl、chk2、chk3的功能分别是:(1)。
【应用4.2】
设应用程序的运行窗口内有两个文本框Txt1和Txt2,其初始内容为空。在Txt1文本框中输入一个数值,当光标离开此文本框(例如进入文本框Txt2)时,执行的程序代码如下:
Private Sub Txt1_LostFocus()
dim x aS double
x=Val(Txtl.Text)
工f x<0 Or x>100 Then
Txtl.Text =""
MsgBox$("请重新输入!")
Txtl.SetFocus
Else
Txt2.Text=Txt1.Text
End If
End Sub
该程序代码的功能是:若在文本框Txtl中输入的数值小于0或大于100,当光标离开此文本框时,(2);否则,将其值复制到文本框Txt2中。
【应用4.3】
在下面的应用中,当窗口内发生C1ick事件时,窗口内将显示如图2-4所示的杨辉三角(每一行都是二项式展开的系数)。请完善程序代码。
Private Sub Form Click()
Dim i,j,c As Integer,StrTemp AS String
Dim a(9)As Integer
a(0)=0=a(1)=l:StrTemp=Str(a(1))+Space(3)
CurrentX=(ScaleWidth-TextWidth(StrTemp))/2
Print StrTemp
For j=2 TO 9
a(j)=1
For C=j-1 TO 2 Step-1
a(c) =(3)
Next
(4)=""
For c = 1 To j
StrTemp = StrTemp & Str((5)) & Space(5 - Len(Str(a(c))))
Next
CurrentX = (ScaleWidth - TextWidth(StrTemp)) / 2
Print StrTemp
Next End Sub
选项
答案
(1)对文字标签中的文字,分别控制其粗体、斜体和下划线设置;或含义相同的文字描述 (2)将该文本框清空:弹出对话框,提示重新输入:光标定位于该文本框中;或含义相同的文字描述 (3)a(c)+a(c-1) (4)StrTemp (5) a?
解析
本题考查Visual Basic中常用控件的属性设置及事件处理。
对于同一框架中的一组单选按钮,只能有一个被选中,用户选中一个时,另一个就自动呈现取消选中状态。这种效果是系统自动赋予的,无须编程。对于复选框,则可以同时选中多个,每个复选框是独立选择的,单击复选框就是改变该复选框的选中状态。因此,复选框的Click事件的程序代码中,还需要判断是选中还是取消选中。
单选钮的属性为Value,其值为True表示选中,为False表示未选中(默认)。
复选框的属性为Value,其值为0表示未选中(默认),1表示选中,2表示禁用。
fontBold、fontltalic和fontUnderLine分别表示文字的粗体属性、斜体属性和下划线属性,因此应用4.1中,复选框chk1、chk2、chk3分别控制文字标签中文字的粗体、斜体和下划线设置。
应用4.2程序代码的功能是:若在文本框Txt1中输入的数值小于0或大于100,当光标离开此文本框时,将该文本框清空,弹出对话框并提示重新输入,光标定位于该文本框中;否则,将其值复制到文本框Txt2中。
应用4.3在窗体中显示杨辉三角(每一行都是二项式展开的系数),观察元素的值可知,值不等于1的元素由其左上角和右上角的元素相加得到。例如,若已经计算出第四行的所有元素,如下所示,然后需求出第五行的所有元素,每行的元素存储在一维数组a中。
a(1) a(2) a(3) a(4)
第四行:1 3 3 1
第五行上的元素自左至右表示为a(1)、a(2)、a(3)、a(4)、a(5),如下所示。
a(1) a(2) a(3) a(4)
第四行: 1 3 3 1
第五行:1 4 6 4 1
a(1) a(2) a(3) a(4) a(5)
先设置最后一个元素a(5)等于1,再根据第四行上的a(4)和a(3)求出第五行上的a(4),
根据第四行的a(3)和a(2)求出第五行上的a(3),依此类推,可求出第五行的每个元素(每行的第一个元素等于1,无需另外计算)。
推广至其他行,可计算出杨辉三角中的每个数并以串的方式输出,对应的程序代码如下:
For j=2 To 9 ’计算出第2行到第9行的每个数并输出
a(j)=1 ’每行的最后一个数为1
For c=j-1 To 2 Step-1
a(c)=a(c)+a(c-1) ’计算出值不等于1的元素
Next
StrTemp="" ’字符串初始化,每行所有数串接成一个字符串输出
For C=1 To j
StrTemp=StrTemp & Str(a(c)) & Space(5-Len(Str(a(C))))
Next
CurrentX=(ScaleWidth-TextWidth(StrTemp))/2
Print StrTemp
Next
转载请注明原文地址:https://kaotiyun.com/show/FnjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
下列快捷功能按钮中,可以在画好的图形内填充颜色的是(49)。
在Microsoft Word中点击“文件”→“另存为”,在保存类型下拉框中不能选择的有(45)。
______不属于企业信息系统存在的问题。
许多书上都说,人一次只能记住或处理5~9(7±2)条信息。为了检验这个结论是否正确,宜采用()调查方法。经过多次调查统计研究发现,人一次平均只能记住或处理4条信息。经考证,原来7±2的说法只是一位专家在一个讲演稿中的估计,并不是真正的调研报告,但却
在PowerPoint2007中,为精确控制幻灯片的放映时间,可使用______功能。
某学校有多个班,每个班有多名学生但只能有一个班长,那么班长与学生这两个实体之间的关系是(57)。
某大型企业下属每个事业部都自行建立了信息系统,各自存储数据,各自配备了技术人员维护系统。由于数据格式不同,难以交流,各系统难以连接,形成了一个个信息孤岛,业务难以协同。为此,公司采取了以下一些整合措施,其中(70)并不恰当。
()是移动互联网的组成部分。
内存用于存放计算机运行时的指令、程序、需处理的数据和运行结果。但是,存储在(2)中的内容是不能用指令修改的。
某PPT文件共有8张幻灯片,现选中第6张幻灯片,对其设置新的背景颜色,单击“应用”按钮后,则()。
随机试题
某井使用31/2方钻杆采用标准螺纹,水龙头是41/2REG内螺纹,则匹配接头为()。
求。
下列内脏中,温度最高的是
下列不属于病性辨证内容的是
预警机制是指能灵敏、准确地告示危险前兆,并能及时提供警示,是机构能采取有关措施的一种制度,其作用在于()。
2009年度中国公民赵某有如下所得:(1)每月工资3400元,已按照所在省规定的办法和比例扣除了住房公积金和各项社会保险费720元,12月份取得除当月工资外的年度绩效工资30000元。(2)2008年10月赵某出售自有住房,取得转让收入10
教师在向小班幼儿描述常规时应避免使用否定性的语句。这是由于()。
某学生家长给余老师送礼,想让余老师给其孩子安排最好的座位,余老师拒绝了。余老师的做法()。
慕尼黑会议(1938年)
组合框和列表框的主要区别是:是否可以在框中【】。
最新回复
(
0
)