首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画两个文本框,名称分别为Text1、Text2,都显示垂直滚动条和水平滚动条,都可以显示多行文本;再画一个命令按钮,名称为C1,标题为“复制”(如图
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画两个文本框,名称分别为Text1、Text2,都显示垂直滚动条和水平滚动条,都可以显示多行文本;再画一个命令按钮,名称为C1,标题为“复制”(如图
admin
2019-05-28
22
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画两个文本框,名称分别为Text1、Text2,都显示垂直滚动条和水平滚动条,都可以显示多行文本;再画一个命令按钮,名称为C1,标题为“复制”(如图3-194所示)。请编写适当的事件过程,使得在运行时,在Text1中输入文本后,单击“复制”按钮,就把Text1中的文本全部复制到Text2中。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.Frm。
选项
答案
审题分析 为让文本框能显示多行,应将其MultiLine属性值设置为True,显示垂直滚动条和水平滚动条需要将ScrollBars属性值设置为3。在“复制”按钮的单击事件过程中,将Text1的Text属性赋值给Text2的Text属性。 操作步骤 步骤1:新建一个“标准EXE”工程。按要求画出控件并设置属性。 步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() Text2.Text=Text1.Text End Sub 步骤3:按要求将文件保存至考生文件夹中。 考点链接 文本控件。
解析
转载请注明原文地址:https://jikaoti.com/ti/2IN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:PrivateSubConunsnd1_Click()Dimx1AsInteger,x2AsInteger,x3AsInteger
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母和数字。单击标题为“统计”的命令按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别在标签控件数组x中显示,如图所示。在给出的窗体文件中
以下关于控件数组的叙述中,错误的是
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoIWhilen<>0s=s&nMod10s=s&n\10M0d10
编写如下程序:PrivateSubConunand1_Click()DimxAsInteger,yAsIntegerx=1y=1Doy=x*yIfy>10ThenExitDoElsex=x+3EndIfLoop
有下面程序代码:PrivateSubCommand1_Click()a=3s=0Fork=1To5s=s+aModka=a+kNextkPrintsEndSub程序运行后,单击命令按钮Command1,输出结果是
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
随机试题
搅拌混凝土过程中能引入大量均匀分布、稳定而封闭的微小气泡的外加剂是指()。
如果企业一定期间内的固定生产成本和固定财务费用均不为零,则由上述因素共同作用而导致的杠杆效应属于( )。
下列各类主体,不属于增值税小规模纳税人的是()。
请系统论述教学模式中的刺激控制教学模式。
“A—B—A”三个乐段构成的结构属于()。
设A=(aij)n×n是正交矩阵,将A以行分块为A=(a1,a2,…an)T,则方程组AX=b,b=(b1,…,bn)T的通解为_________.
下面程序段执行结果为x=Int(Rnd()+4)SelectCasexCase5Print"excellent"Case4Print"good"Case3Print"pass"CaseElsePrint"
Itiseasytodeterminewhethersmokingishazardous.Smokingreducesone’slifeexpectancy.
"Themoregadgetsthereare,the【C1】______thingsseemtoget."saidHonoreErvin,co-authorofTheEtiquetteGirls:ThingsYou
—WhatdoyouthinkmadeMarysoupset?—hernewbicycle.
最新回复
(
0
)