下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、 、单项选择题 1、 设x=4,y=6,则以下不能在窗体上显示出“ A=10得语句就是() A、PrintA=x+yB、PrintA=;x+y C、Prin tA=+Str(x+y)D、Prin tA= b=4 PRINT b v a END 运行后,输出得结果就是 A、4 3 ( ) B、-1 C、 0 D、 显示出 错信息 4、在窗体(名称为Form1)上画一个名称为 Text1得文本框与一个名称为 mand1得命令 按钮,然后编写一个事件过程。程序运行以后,如果在文本框中输入一个字符,则把命 令按钮得标题设置为“计算机等级考试”。以下能实现上述操作得事件过程就是 A、 Private S
2、ub Text1_Cha nge() B、Private Sub man d1_Click() mand1、Caption= ”计算机等级考试” Capti on= ”计算机等级考试” End Sub End Sub C、Private Sub Form1_Click() D 、 Private Sub mand1_Click() Text1 、Caption= ”计算机等级考试”Text1 、Text= ”计算机等级考试” End Sub End Sub 5、假定有如下得窗体事件过程 : Private Sub Form_Click() a$ = Microsoft Visual Basic
3、 b$ = Right(a$, 5) c = Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序运行后单击窗体 ,则在弹出得信息框中得标题栏中显示得信息就是( ) A、 Microsoft Visual B 、 Microsoft C、 Basic D 、 5 6、窗体上放置了三个文本框 ,若在 Text1 中输入 456,在 Text2 中输入 78,在程序中执行了 语句 Text3=Text1+Text2 后 ,则在 Text3 中显示 ( ) A、 434 B 、 45678 C、 溢出 D、 语法错误 7、执行下面得程序 ,单击窗体 ,则
4、在窗体上显示得就是 ()。 Option Explicit Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer b = 6: c = 6 、 5 a = b = c Print a End Sub A 、 1B、 -1C、 0D、 语法错误 说明 : False- 0 True -1 8、语句 PRINT “INT(-13 、2)=”;INT(-13 、2) 得输出结果为 : A、 INT(-13 、2)= -13 、2 B 、 INT(-13 、2)= 13 、2 C、 INT(-13 、2)= -13D
5、、 INT(-13 、2)= -14 、填空题 1、在窗体上画一个命令按钮 ,然后编写如下事件过程 Private Sub mand1_Click() a = lnputBox(请输入一个整数”) b = InputBox(请输入一个整数”) Print a + b End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入321与456,输出结果为_321456 2、 执行下面得程序段后,b得值为300 。 a=300 b=20 a=a+b b=a-b a=a-b 3、 在窗体上画一个文本框与一个图片框,然后编写如下两个事件过程: Private Sub Form_Click() Te
6、xt1、Text = VB 程序设计 End Sub Private Sub Text1_Change() Picture1、Print VB Programming End Sub 程序运行后,单击窗体,在文本框中显示得内容就是VB程序设计,而在图片框中显示 得内容就是 VB Programming 。 4、 在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click() x = InputBox(请输入一个整数”) Print x + Text1、Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击确定”
7、按钮后,则在窗体上显示得内容就是 123456 。 5、 如果在立即窗口中执行以下操作: a = 8 (vCR就是回车键,下同) b = 9 Print a b 则输出结果就是 False 。 6、在窗体上画一个名称为mand1得命令按钮与三个名称分别为Labell、Label2、Label3 得标签,然后编写如下代码: Private x As Integer N=10 Private Sub mand1_Click() Z=10+0=10 Y=0+10=10 Static y As Integer X=0+10=10 Dim z As Integer N=10 n = 10 Z=10+0=
8、10 z = n + z Y=10+10=20 X=10+10=20 y = y + z x = x + z N=10 Z=10+0=10 Label1、Caption = x Y=20+10=30 Label2、Caption = y X=20+10=30 Label3、Caption = z End Sub 运行程序,连续三次单击命令按钮后,则三个标签中显示得内容分别就是30 30 10。 7、若在一个应用程序窗体上,依次创建了 mandButton、TextBox、 Label等控件,则运行 该程序显示窗体时,mandButton会首先获得焦点。 &在窗体上画一个名称为mand1得命令按
9、钮,然后编写如下事件过程: Private Sub ma nd1_Click() a$=VisualBasic Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示得内容就是VVV 。 9、输入下列程序 Private Sub mand1_Click() Text1 、Text= ” 努力” End Sub Private Sub mand2_Click() Textl、Text= ” 学习” End Sub 单击mand2按钮,又单击mand1按钮,在文本框中显示 努力_ _ 。 10、要使Print方法在Form_Load()事件过程中有效,必须将_窗体得Visible 属性设置为True,或者
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 山东省聊城市东阿县姜楼中学2024-2025学年上学期八年级历史水平调研试题(含答案)
- 2024年商铺分租协议样式
- 2024年融资租赁协议法规细化
- 2024年协议作废声明模板
- 2024信息技术服务采购协议样本
- 2024年度专业财务会计岗位聘请协议
- 2024年房产抵押借款协议范本
- 2024朋友间借贷协议示范文本
- 2024专业监控服务协议模板
- 2024年建筑项目合伙投资协议
- 配件供应技术服务和质保期服务计划方案
- 孩子分为四种:认知型、模仿型、逆思型、开放型
- 建筑物维护管理手册
- 信息系统应急管理培训
- 制药纯化水系统培训
- 交通警察培训课件
- ISTA-2A-包装运输测试报告-审核通过
- 魁北克腰痛障碍评分表(Quebec-Baclain-Disability-Scale-QBPDS)
- 政府采购网上商城服务规范第1部分:交易流程
- 3D打印技术与应用
- 卤味官方直播话术
评论
0/150
提交评论