阅读以下应用说明以及用Visual Basic语言编写的程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【应用4.1】设应用程序的运行窗口内有一个文字标签(Label)以及一个框架，其中有三个复选框(chk1，chk2，chk3)，各个复选框单击事件过程的程序代码如下：Private Sub chkl_Click()Label.fontBold=chkl.ValueEnd SubPrivate Sub chk2_Click()Label.fontltalic=chk2.ValueEnd SubPri

题目

阅读以下应用说明以及用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.●试题五阅读以下应用说明及Visual Basic部分程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【说明】在窗体上画一个名称为Combo1的组合框，画两个名称分别Label1、Label2及Caption属性分别为"城市名称"和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示"已成功添加输入项"；如果存在，则在Label2中给出提示"输入项已在组合框中"。【程序】Private Sub Combo1_ (1) (KeyAscii As Integer)If KeyAscii= (2) ThenFor i=0 To (3)If Combo1．Text= (4) ThenLabel2．Caption="输入项已在组合框中"Exit SubEnd IfNext iLabel2．Caption="已成功添加输入项"Combo1． (5) Combo1．TextEnd IfEnd Sub

2.阅读以下应用说明、属性设置及Visual Basic程序代码，将应填入______处的语句写在答题纸的对应栏内。[应用说明7]本应用程序的运行窗口如图2-5所示。只要用户单击“闪烁”按钮，文字“欢迎光临”就会以0.3s消失、0.3s显示反复进行闪烁；单击“停止”按钮，闪烁停止，恢复图示的初态。[属性设置7][程序代码7]Private Sub CmdF C1ick()Timerl. (3)=TrueLabel.Visible=FalseEnd SubPrivate Sub Timerl_Timer()(4)=not Label.VisibleEnd SubPrivate Sub CmdT_Click()Timerl.Enabled=(5)Label.Vlsible=trueEnd Sub

3.●试题五阅读以下应用说明、属性设置及Visual Basic程序代码，将应填入(n)处在字句写在答题纸的对应栏内。【说明】本应用程序的运行窗口如图2所示。只要用户单击"闪烁"按钮，文字"欢迎光临"就会以0．3秒消失、0．3秒显示反复进行闪烁；单击"停止"按钮时，闪烁停止，恢复图示的初态。在开发过程中，需要设置的属性如表1所示。在开发过程中，需要编写的程序代码如下：【程序】Private Sub CmdF_Click()Timer1． (3) =TrueLabe1．Visible=FalseEnd SubPrivate Sub Timer1_Timer()(4) =not Label.VisibleEnd SubPrivate Sub CmdT_Click()Timer1．Enabled= (5)Labe1．Visible=trueEnd Sub

4.阅读下面的说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。[说明]阅读以下说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。windows Server 2003是一个多任务多用户的操作系统，能够以集中或分布的方式实现各种应用服务器角色，是目前应用比较广的操作系统之一。Windows内置许多应用服务功能，将下表中(1)～(5)处空缺的服务器名称填写在答题纸对应的解答栏内。(1)

参考答案和解析
正确答案：(1)对文字标签中的文字分别控制其粗体、斜体和下划线设置；或含义相同的文字描述 (2)将该文本框清空：弹出对话框提示重新输入：光标定位于该文本框中；或含义相同的文字描述 (3)a(c)+a(c-1) (4)StrTemp (5) a?
(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)
第四行：1331
第五行上的元素自左至右表示为a(1)、a(2)、a(3)、a(4)、a(5)，如下所示。
a(1)a(2)a(3)a(4)
第四行：1331
第五行：14641
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
更多“ 阅读以下应用说明以及用Visual Basic语言编写的程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【应用4.1】设应用程序的运行窗口内有一个文字标签(Label)以及一个框架，其中有三个复选框(chk”相关问题

  • 第1题：

    试题三（共 15 分）

    阅读以下说明和 C 程序，将应填入 （n） 处的字句写在答题纸的对应栏内。


    正确答案：

  • 第2题：

    （a）智能网概念模型中分布功能平面模型如下图所示，请根据此图将应填入（n）处的 字句写在答题纸的对应栏内。


    正确答案：
    （1）SMF（或业务管理功能）
    （2）SCEF（或业务生成功能）
    （3）SDF（或业务数据功能）
    （4）SCF（或业务控制功能）
    （5）SSF（或业务交换功能）
    （6）CCF（或呼叫控制功能）

  • 第3题：

    阅读下列说明和?C++代码，将应填入(n)处的字句写在答题纸的对应栏内。
    【说明】
    阅读下列说明和?Java代码，将应填入?(n)?处的字句写在答题纸的对应栏内。
    【说明】
    某快餐厅主要制作并出售儿童套餐，一般包括主餐(各类比萨)、饮料和玩具，其餐品种
    类可能不同，但其制作过程相同。前台服务员?(Waiter)?调度厨师制作套餐。现采用生成器?(Builder)?模式实现制作过程，得到如图?6-1?所示的类图。






    答案：
    解析：

  • 第4题：

    图2-1是基于软交换的网络分层模型。请将选项应填入（n）处的字句写在答题纸对应的解答栏内。


    正确答案：
    （1）业务/应用层
    （2）控制层
    （3）接入层
    （4）媒体网关

  • 第5题：

    图6-1是下一代网络的体系结构简图，请根据此简图将应填入（n）处的字句写在答题纸的对应栏内。


    正确答案：
    （1）业务平面
    （2）控制平面
    （3）传输平面
    （4）接入平面
    （5）SIP-TBICC
    （6）SIGTRAN
    （7）MGCP/H.248
    （8）H.323
    （9）SIP

相关内容