visual basic语言程序设计及实验教程习题答案
visual basic 程序设计课后习题参考答案

[Exit Function] End Function
(4). Function 过程的调用方法: ①直接调用 像使用 VB 内部函数一样,只需写出函数名
和相应的参数即可 ②用 Call 语句调用 与调用 Sub 过程一样来调用 Function
过程,当用这种方法调用 Function 过程时,将会放弃返回值 3、简述 VB 过程中参数传递的两种方式。
第五章 数 组
4
一、选择题
1 2 3 4 5 6 7 8 9 10 DADEBBCCC A
二、填空题
1 2、12、1、3、-1、2 0123 2222
2 2101 4444
3 name、index 4 preserve、erase 5 ubound、lbound
第六章 过 程
一、选择题
1 2 3 4 5 6 7 8 9 10 DCDCBABAB D 11 12 13 14 15 16 17 18 19 20 ACCDABCDB C
二、填空题
1 bas 2 形式、实际 3 a()、Ubound(b)、n=n-1 4 30、70 5 fedcba、static
三、简答题
6 static 7 static 8 12、7 9 visual basic 程序设计 10 -100
1、简述事件过程和通用过程的含义和联系。
5
VB 应用程序是由过程组成的,过程是完成某种特殊功能的一 组独立的程序代码。VB 中的过程有两大类:事件过程和通用过程
Visual basic 程序设计习题参考答案
第一章 Visual basic 程序设计
一、选择题
1 2 3 4 5 6 7 8 9 10
DC
CDCBAC B
《Visual Basic程序设计教程》习题参考答案

第1章习题一、选择题1. B2. A3. B4. A二、填空题1. 事件驱动或消息驱动2. 工程资源管理器、窗体三、问答题1. 11个菜单项。
文件菜单包括新建工程、打开工程、添加工程、移除工程、保存工程、工程另存为、保存窗体文件、窗体文件另存为、打印、打印设置、生成可执行文件等命令项;编辑菜单(命令项略,以下同)、视图菜单、工程菜单、格式菜单、调试菜单、运行菜单、查询菜单、图表菜单、工具菜单、外接程序菜单、窗口菜单、帮助菜单。
2. 可以自行定义。
标准工具栏中有添加工程、添加窗体、菜单编辑器、打开工程、保存工程、剪切、复制、粘贴、查找、撤销、恢复、启动、中断、结束、工程资源管理器、属性窗口、窗体布局窗口、对象浏览器、工具箱、数据视图窗口等按钮。
四、编程题(略)第2章习题一、选择题1. A二、练习题1. S1. 把x赋值给同类型变量t;S2. 把y赋值给x;S3. 把t赋值给y。
2. S1. 输入a、b、c;S2. 如果a<b,则交换a与b的数据;S3. 如果a<c,则交换a与c的数据;S4. 如果b<c,则交换b与c的数据;S5. 输出a、b、c。
3. S1. 输入整数N;S2. 给整数K赋值2;S3. 如果K大于N-1,则转S6;S4.如果N除以K 的余数为0,则转S7;S5. K加1再赋值给K,转S3.;S6. 如果K大于N-1,则N为素数;否则N不是素数。
4. S1. 输入整数N;S2. 将N赋值给K;S3. 给整数nx赋值0;S4. 计算nx乘以10加K除以10的余数,再赋值给nx;S5. 计算K除以10的整数商,赋值给K;S6. 如果K>0,则转S4;否则,转S7;S7. 如果N=nx,则N为回文数,否则N不是回文数。
5.6.第3章习题一、选择题1. D2. C3. A4. B5. D6. A7. B8. D9. B 10. D 11. A . 12. C 13. C 14. C二、填空题1. 标题、引用2. ②④⑤3. 64. GotFocus、Resize5. AddItem、Clear6. Label,CommandButton,OptionButton,CheckBox,Frame、TextBox,ListBox,ComboBox7. PictureBox,Frame8. OptionButton,CheckBox,HScrollBar,VScrollBar、OptionButton、CheckBox,HScrollBar,VScrollBar三、问答题1. 答:对象的只读属性的属性值(如名称属性)只能在设计界面时在属性窗口进行设置;非运行属性的属性值则既可在设计界面时在属性窗口进行设置,也可通过程序代码进行设置与修改。
VisualBasic程序设计教程第实验答案修订版

V i s u a l B a s i c程序设计教程第实验答案修订版IBMT standardization office【IBMT5AB-IBMT08-IBMT2C-ZZT18】※声明:1.实验所属课本原件为《Visual Basic程序设计教程(第4版)(□主编龚沛曾□编者杨志强陆慰民谢步瀛)》;2.实验答案代码采用红色字体突出;3.仅提供课本前七个实验的代码,之后的实验上课考试均不涉及故不作;4.教学平台上机实验、课本篇后实验,两者题目操作略有差异,作业以前者要求为准,故以下答案代码为前者代码,如对后者代码有所需求请私信;5.本文为作者原创,复制转载请注明出处;6.如果对代码有所疑问,或者略感繁琐想直接要已完成实验,请私信;7.浏览、复制、下载后请给作者一个合理的评价,感激不尽。
实验1-1编制简单的欢迎界面程序。
要求:在屏幕上显示“欢迎学习Visual Basic”;在文本框Text1中输入姓名;单击命令按钮“你输入的姓名是”,在Label3标签显示在文本框中输入的姓名。
“学号-1-1.frm”和“学号-1-1.vbp”文件名保存。
以后每个实验项目的命名Private Sub Command1_Click() Label3.Caption = Text1.Text End Sub实验1-2Command2Caption="";Style=1;Picture="key04.ico";ToolTipText="手动"Timer1Interval=0注:因为印刷错误,例题1.1中两个命令按钮的图形与事件过程代码不一致,需要调整。
提示:自定义事件过程MyMove代码应调整为,可实现文字移动方向的改变Sub MyMove()Label1.Move Label1.Left - 50, Label1.TopIf Label1.Left < 0 Then Label1.Left = Form1.WidthEnd SubSub MyMove()Label1.Move Label1.Left - 50, Label1.TopIf Label1.Left < 0 Then Label1.Left = Form1.WidthEnd SubPrivate Sub Command1_Click()Timer1.Interval = 200End SubPrivate Sub Command2_Click() Timer1.Interval = 0Call MyMoveEnd SubPrivate Sub Form_Load()Timer1.Interval = 0End SubPrivate Sub Timer1_Timer()Call MyMoveEnd Sub实验1-3“学号-1-3”为项目名保存。
visual_Basic程序设计教程_课后习题答案及练习

visual_Basic程序设计教程_课后习题答案及练习第⼀章Visual Basic程序设计概述⼀、填空题1、Visual Basic是⼀种⾯向__________的可视化程序设计语⾔,采取了__________的编程机制。
2、在VB中⼯程⽂件的扩展名是____________,窗体⽂件的扩展名是____________,标准模块⽂件的扩展名是____________。
3、执⾏“⼯程”菜单下的__________命令,可选择并添加ActiveX控件。
4、Visual Basic 6.0⽤于开发__________环境下的应⽤程序。
⼆、选择题1、下⾯不是VB⼯作模式的是()A.设计模式B.运⾏模式C.汇编模式D.中断模式2、可视化编程的最⼤优点是()A.具有标准⼯具箱B.⼀个⼯程⽂件由若⼲个窗体⽂件组成C.不需要编写⼤量代码来描述图形对象D.所见即所得3、下列不能打开属性窗⼝的操作是()A.执⾏“视图”菜单中的“属性窗⼝”命令B.按F4键C.按Ctrl+TD.单击⼯具栏上的“属性窗⼝”按钮4、下列可以打开⽴即窗⼝的操作是()A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G5、Visual Basic的编程机制是()A.可视化B.⾯向对象C.⾯向图形D.事件驱动三、简答题1、代码窗⼝主要包括哪⼏部分?2、在⼯程资源管理器窗⼝中,主要列出了哪三类⽂件?3、窗体布局窗⼝的主要⽤途是什么?4、VB的基本特点是什么?5、怎样理解可视化设计?6、怎要理解事件驱动编程?第⼆章简单的VB程序设计⼀、填空题1、设置是否可以⽤Tab键来选取命令按钮,应该⽤______________属性。
2、⼀个控件在窗体的位置由_______和________属性决定,其⼤⼩由__________和_________属性决定。
3、利⽤对象的属性setfocus可获得焦点,对于⼀个对象,只有其visible属性和____________属性为true,才能接受焦点。
visual_Basic程序设计教程_课后习题答案及练习

第一章Visual Basic程序设计概述
一、填空题
1、VisualBasic就是一种面向__________得可视化程序设计语言,采取了__________得编程机制。
2、在VB中工程文件得扩展名就是____________,窗体文件得扩展名就是____________,标准模块文件得扩展名就是____________。
B.一个工程文件由若干个窗体文件组成
C.不需要编写大量代码来描述图形对象ﻩ
D.所见即所得
3、下列不能打开属性窗口得操作就是( )
A。执行“视图”菜单中得“属性窗口”命令
B.按F4键C.按Ctrl+T
D.单击工具栏上得“属性窗口”按钮
4、下列可以打开立即窗口得操作就是( )
A.Ctrl+DB、Ctrl+EC。Ctrl+FD.Ctrl+G
D。文本框得LOCKED属性为FALSE
12、在运行阶段,要在文本框TEXT1获得焦点时选中文本框中所有内容,对应得事件过程就是()
A.Private SubText1_GotFocus( )
Text1、SelStart=0
Text1。Sellength=Len(Text1。Text)
EndSub
B.PrivateSubText1_LostFocus( )
4、设置控件背景颜色得属性名称就是______________________。
5、所有控件都具有得共同属性就是__________________属性。
6、一般情况下,控件有两个属性项得缺省值就是相同得,这两个属性项就是_______________。
7、VB中得每个对象(控件)都有一组特征,这组特征称为__________,我们通过修改它可以控制对象得外观与操作、
VB程序设计学习与实验指导答案-推荐下载

对全部高中资料试卷电气设备,在安装过程中以及安装结束后进行高中资料试卷调整试验;通电检查所有设备高中资料电试力卷保相护互装作置用调与试相技互术关,系电通,力1根保过据护管生高线产中0不工资仅艺料可高试以中卷解资配决料置吊试技顶卷术层要是配求指置,机不对组规电在范气进高设行中备继资进电料行保试空护卷载高问与中题带资2负料2,荷试而下卷且高总可中体保资配障料置2试时32卷,3各调需类控要管试在路验最习;大题对限到设度位备内。进来在行确管调保路整机敷使组设其高过在中程正资1常料中工试,况卷要下安加与全强过,看度并25工且52作尽22下可护都能1关可地于以缩管正小路常故高工障中作高资;中料对资试于料卷继试连电卷接保破管护坏口进范处行围理整,高核或中对者资定对料值某试,些卷审异弯核常扁与高度校中固对资定图料盒纸试位,卷置编工.写况保复进护杂行层设自防备动腐与处跨装理接置,地高尤线中其弯资要曲料避半试免径卷错标调误高试高等方中,案资要,料求编试技5写、卷术重电保交要气护底设设装。备备置管4高调、动线中试电作敷资高气,设料中课并技3试资件且、术卷料中拒管试试调绝路包验卷试动敷含方技作设线案术,技槽以来术、及避管系免架统不等启必多动要项方高方案中式;资,对料为整试解套卷决启突高动然中过停语程机文中。电高因气中此课资,件料电中试力管卷高壁电中薄气资、设料接备试口进卷不行保严调护等试装问工置题作调,并试合且技理进术利行,用过要管关求线运电敷行力设高保技中护术资装。料置线试做缆卷到敷技准设术确原指灵则导活:。。在对对分于于线调差盒试动处过保,程护当中装不高置同中高电资中压料资回试料路卷试交技卷叉术调时问试,题技应,术采作是用为指金调发属试电隔人机板员一进,变行需压隔要器开在组处事在理前发;掌生同握内一图部线纸故槽资障内料时,、,强设需电备要回制进路造行须厂外同家部时出电切具源断高高习中中题资资电料料源试试,卷卷线试切缆验除敷报从设告而完与采毕相用,关高要技中进术资行资料检料试查,卷和并主检且要测了保处解护理现装。场置设。备高中资料试卷布置情况与有关高中资料试卷电气系统接线等情况,然后根据规范与规程规定,制定设备调试高中资料试卷方案。
《VisualBasic程序设计》试题及其答案

《V i s u a l B a s i c程序设计》试题及其答案Tomorrow Will Be Better, February 3, 2021一、填空题每题1分,共10分1.把数学式子: 25sin 21π+写成VB 的数值表达式为Sqr1+3.14159/2Sin253.14159/180 ;2.设A=5,B=6,C=7,D=8,表达式3>2B OR A=C AND B<>C OR C>D 的值是 True ;3.若Case 子句中的表达式表列具有形式:<表达式1> To <表达式2>,则它的含义是:当测试表达式的值等于 指定范围内的值 时,执行该Case 子句相应的语句块;4.执行下面的程序段后,x 的值为 12 ;x=0For i=1 To 8 Step 3x=x+iNext i5.在图片框上放置的控件称为图片框的 子 对象,而窗体是图片框的 父 对象;6.将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为 Text1.Text=Command1.Caption7.复选框的Value 属性为 1 时,表示复选框被选中;8. 使用滚动条可以获取某一范围内的数值输入;为使垂直滚动条的Value 属性值从下往上递增变化,应设置滚动条Min 属性值大于 Max 属性值;9.语句:Dim A-3 to 4 as Integer 定义的一维数组A 的元素个数是 8 ;10.给定如下子过程:Function funByVal num As Long As LongDim k As Long,i As Integerk=1For i=1 To numk=kiNext iEnd Function执行语句Print fun5 后在窗体上显示的结果为 0 ;二、单项选择题每题1.5分,共30分1.装载窗体是窗体的 C ;A 对象B 属性C 事件D 方法2.设a="Visual Basic",下面使b 的值为"Basic"的赋值语句正确的是 B ;A b=Lefta,8,12B b=Mida,8,5C b=Righta,5,5D b=Lefta,8,53.设X 为整型变量,不能正确表达1< X < 5的逻辑表达式是 A ;A 1< X <5B X=2 or X=3 or X=4C 1<X And X <5D Not X<=1 And Not X>=54.InputBox 函数返回值的类型为 B ;A 数值型B 字符串型C 逻辑型D 货币型5.执行语句:Print 4+5\68/8 Mod 9 输出的值是 A ;A 4B 5C 6D 76.下列循环语句能正常结束循环的是 C ;Ai=5 B i=1Do Doi=i+1 i=i+2Loop Until i< 0 Loop Until i=10Ci=10 D i=6Do Doi=i+1 i=i-2Loop Until i> 0 Loop Until i=17.以下叙述中正确的是 A ;A 窗体的Name属性指定窗体的名称 ,用来标识一个窗体B 窗体的Name属性的值是显示在窗体标题栏中的文本C 可以在运行期间改变窗体的Name属性的值D 窗体的Name属性值可以为空8.VB为命令按钮提供的Cancel属性 A ;A 用来指定命令按钮是否为窗体的“取消”按钮B 用来指定命令按钮的功能是停止一个程序的运行C 用来指定命令按钮的功能是关闭一个运行程序D 用来指定命令按钮的功能是中断一个程序的运行9.若使命令按钮失效,要对 A 属性设置为False;A EnabledB VisibleC BackColor DCaption10.在窗体中添加两个文本框其Name属性分别为Text1和Text2和一个命令按钮Name属性为Command1,然后编写如下两个事件过程:Private Sub Command1_Clicka = UCaseText1.Text + LeftText2.Text, 3Print aEnd SubPrivate Sub Form_LoadText1.Text = "abcDEF"Text2.Text = "123456"End Sub程序启动后,单击命令按钮,输出结果为CAabcDEF123456 BabcDEF123CABCDEF123 Dab12345611.在运行程序时,要使文本框获得焦点,则需使用B方法;A ChangeB SetFocusC GotFocusD Move12.下列语句中不能把图片框Picture1中的图形清除的是 A ;A Picture1.DelB Picture1.Picture=LoadPicture""C Picture1. Picture= LoadPictureD Picture1. Picture=Nothing13.要删除列表框中的某一个项目,需要使用 D 方法;A ClearB ReMoveC MoveD ReMoveItem14.在组合框中选择某一项目内容,在程序中可以通过D属性获得;A ListB ListIndexC ListCountD Text15.若有数组说明语句:Dim aAS Integer,则a被定义为B ;A 定长数组B 可调数组C 静态数组D 可变类型数组16.有如下语句:Type StudentName As StringAge As IntegerSex As StringEnd TypeDim Stu As StudentWith Stu.Name = "李强".Age = 21.Sex = "男"End With执行语句Print Stu.Age后在窗体上显示的结果是 B ;A李强 B21 C“男” DAge17.要使子过程f1调用后能用形式参数返回两个结果,下面子过程定义正确的是C ;ASub f1ByVal n%,ByVal m% BSub f1n%,ByVal m%<子过程体> <子过程体>End Sub End SubCSub f1n%,m% DSub f1ByVal n%,m%<子过程体> <子过程体>End Sub End Sub18.以下叙述中错误的是 D ;A 一个工程中可以包含多个窗体文件B 在一个窗体文件中用Private定义的子过程或函数过程不能被其他窗体文件调用C 在设计VB程序时,窗体模块和标准模块需要分别保存为不同类型的文件D 全局变量必须在标准模块中定义19.从磁盘上打开顺序文件"c:\t1.txt"为读入数据做好准备,如下语句A是正确的;A F="c:\t1.txt" BF="c:\t1.txt"Open F For Input As 1 Open "F" For Input As 2 COpen "c:\t1.txt" For Output As 1 DOpen c:\t1.txt For Input As 220.以下叙述中正确的是 B ;A 一个记录中所包含的各个元素的数据类型必须相同B 随机文件中每个记录的长度是固定的C Open命令的作用是打开一个已经存在的文件D 使用Input语句可以从随机文件中读取数据三、程序阅读题第1题3分,第2题5分,其余题各4分,共24分1.当x的输入值分别为4、8和12时,写出执行下列事件过程的输出结果;Private Sub Command1_ClickDim x%, y%x = InputBox"请输入x的值:"Select Case xCase 1, 3, 5 ,7y = x + 10Case 8 To 10y = x + 2Case 2, 4, 6y = 5 xCase Is > 10y = x x + 1End SelectPrint "x="; x, "y="; yEnd Subx=4 y=20x=8 y=10x=12 y=1452. 写出执行下列事件过程的输出结果;Private Sub Command1_ClickConst n = 3Dim i As Integer, k As Integer For i = 1 To nPrint Tabn - i 2 + 1;For k = 1 To iPrint Strk;Next kFor k = i - 1 To 1 Step -1 Print Strk;Next kPrintNext iEnd Sub11 2 11 2 3 2 13.设在一个窗体如图所示中已设置了一个组合框Combo1和文本框Text 1,且有下列程序,试写出事件过程Combo1_Click的功能;Dim str As StringPrivate Sub Form_Loadstr = " "Combo1.AddItem "北京"Combo1.AddItem "天津"Combo1.AddItem "西安"Combo1.AddItem "上海"Combo1.AddItem "武汉"Combo1.AddItem "广州"Combo1.AddItem "海口"Combo1.Text = "北京"End SubPrivate Sub Combo1_Clickstr = str & Combo1.Text & ","Text1.Text = strEnd Sub在文本框中显示单击组合框列表项目时该项目的内容,而且以后来添加的方式在文本框中显示所有选择项目的内容;4. 写出执行下列事件过程的输出结果;Private Sub Form_ClickDim a1 To 2, 1 To 2 As IntegerDim i As Integer, j As IntegerFor i = 1 To 2For j = 1 To 2ai, j = 2 i - 1 4 + jNext jNext iFor i = 1 To 2Print ai, 3 - i, a3 - i, iNext iEnd Sub6 1313 65.写出执行下列事件过程的输出结果;Private Sub Command1_ClickDim a As Integer, b As Integera = 3:b = 2Call f8, aPrint "a="; a, "b="; bCall fa, bPrint "a="; a, "b="; bEnd SubPrivate Sub fByVal x As Integer, y As Integerx = x + 1y = y - 1End Suba=2 b=2a=2 b=16.若有如下窗体模块:Dim a As IntegerPrivate Sub testDim b As Integera = a + 1:b = b + 1Print "Sub: "; a, bEnd SubPrivate Sub Command1_Clicka = 2:b = 3Call testCall testEnd Sub写出当程序启动并单击命令按钮后,在窗体中显示的结果;Sub: 3 1Sub: 4 1四、程序填空题每空2分,共22分1. 下面事件过程的功能是:输入某个学生某门课程的百分制成绩,并根据成绩输出评语,若0≤成绩<60 时,评语为“差”;若60≤成绩<70时,评语为“通过”;若70≤成绩<80时,评语为“中等”;若80≤成绩<90时,评语为“良好”;若90≤成绩≤100时,评语为“优秀”,在横线上填上适当内容;Private Sub Command1_ClickDim ss = InputBox"请输入学生的成绩:"If 0<=s And s<=100 ThenSelect Case 1 sCase Is >= 90Print "优秀"Case Is >= 80Print "良好"Case Is >= 70Print "中等"Case Is >= 60Print "通过"2 Case Else或Is >=0Print "差"End SelectEnd IfEnd Sub2.下面程序的功能是:计算 f=1 -1/2×3+1/3×4-1/4×5+ … +1/19×20的值,在横线上填上适当内容;Private Sub Form_ClickDim f As Single,i As Integer,sign As Integer3 sign=-1f = 14 for i=2 to 19f = f + sign/ii + 15 sign=sign-1Next iPrint " f= "; fEnd Sub3.下面窗体模块的功能是:从键盘上输入x,y和z的值,按如下公式求f x,y,z的值的程序,在横线上填上适当内容;fx,y,z=sinx/sinx-ysinx-z+siny/siny-zsiny-x+sinz/sinz-xsinz-y其中x、y和z互不相等;Function fByVal a As Single,ByVal b As Single,ByVal c As Single 6 As Single7 f=Sina/Sinb SincEnd FunctionPrivate Sub Command1_ClickDim x, y, z, sx = InputBox"x="y = InputBox"y="z = InputBox"z="If x <> y And y <> z And z <> x Thens=fx,x-y,x-z+fy,y-z,y-x+ 8 fz,z-x,z-yPrint "s="; sElsePrint "数据输入错误"End IfEnd Sub4.下面事件过程的功能是从学生分数顺序文件D: \file1.dat中读取各个学生的分数,并求该班的平均成绩,在横线上填上适当内容;Private Sub command1_ClickDim n%, score, sOpen "D:\file1.dat" 9 As 3 For Inputn = 0: s = 0While 10 Not EOF3Input 3,scores = s + scoren = 11 n+1WendPrint "平均成绩为:"; s / nClose 3End Sub五、程序设计题每题7分,共14分1. 假设体操比赛有10个评委和评分规定为:①采用10分制;②去掉一个最高分和去掉一个最低分,然后计算平均分,该平均分作为最后得分;试编写一个事件过程,输入10个评委对某个运动员的评分存放在一维数组s中,计算该运动员的最后得分;Private Sub Command1_ClickDim s1 To 10, max, min, i%, summax = 0: min = 11: sum = 0For i = 1 To 10si = InputBox"请输入第" & Stri & "个评委的分数"Next iFor i = 1 To 10If si > max Then max = siIf si < min Then min = sisum = sum + siNext iPrint "最后得分:"; sum - max - min / 8End Sub2. 勾股定理中的三个数a 、b 和c 的关系为:222c b a =+;试编写一个事件过程,求出30以内满足上述关系的整数组合并输出;例如,3、4和5就是这样一个整数组合;Private Sub Command1_ClickPrint "a","b","c"For a = 1 To 30For b = 1 To 30For c = 1 To 30If aa+bb=cc Then Print a,b,cNext cNext bNext aEnd Sub。
《Visual Basic程序设计教程(第2版)》课后部分编程题参考答案

第1章1. 按要求设置窗体属性2.在窗体上建立一个标签Label1。
程序代码如下:Private Sub Form_Click()Label1.Caption = "你单击了窗体"End SubPrivate Sub Form_DblClick()Label1.Caption = "你双击了窗体"End Sub3.在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。
两个文本框的Text属性均为空。
Private Sub Command1_Click()Dim x As Singlex = Val(Text1.Text)Text2.Text = 15 * xEnd Sub第2章1~3题:按要求完成操作练习。
4. Private Sub Command1_Click() '"最大化"按钮Form1.WindowState = 2 '最大化End SubPrivate Sub Command2_Click() '"还原"按钮Form1.WindowState = 0 '还原End SubPrivate Sub Command3_Click() '"最小化"按钮Form1.WindowState = 1 '最小化End Sub5.在窗体上建立三个文本框Text1(第一个数)、Text2(第二个数)、Text3(计算结果)和一个命令按钮Command1(“计算”)。
Private Sub Command1_Click()Dim x As SingleDim y As Singlex = Val(Text1.Text)y = Val(Text2.Text)Text3.Text = x * x + y * yEnd Sub6. 在窗体上建立两个文本框Text1(输入一串字符)、Text2(输出结果)和一个命令按钮Command1。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
18
19
20
A
B
B
B
C
二.多项选择题
1
2
3
4
5
6
ABCFGHJ
BE
CDE
CDE
AE
BCDE
三.填空题
1、s = True And a >= 18 And a <= 20 And h > 165 Or s = False And a >= 16 And a <= 18 And h > 160
2、60000
4.2。
5.Text1.SetFocus。
6.编程技术,程序设计。
7.Change内容改变,将文本框内容显示在标签中。
GotFocus(获得焦点),选中文本框内容。
8.(1)Value,(2)Value
习题4参考答案
一.单选题
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
C
A
C
C
B
A
D
C
A
D
B
C
D
C
B
16
A
B
B
C
D
C
B
二、填空题
1、EF
2、(1) 2 (2)1 (3) 2
3、(1)10(2)28(3)6(4)6
4、Comand1_Click()
习题8参考答案
一、单项选择题
1
2
3
4
5
6
7
B
B
A
A和D
A
B
A
习题9参考答案
一、单项选择题
1
2
3
4
5
6
7
8
9
10
A和C
D
C
A
C
A
D
B
C
D
二、判断题
1-10:×√×√×√√×√×
C,D
三.填空题
1、
⑴sin(50*3.14/180)
⑵(2+x*y)/(2-y^2)
⑶a^2-(3*a*b/(3+a))
⑷(x^3)^(1/8)+sqr(y^2+4*a^2/(x+y^3))
2、
int(rnd*(55-50+1)+50)
3、
⑴138
⑵3
⑶214
⑷inchina
⑸70
(6)45
⑺0
习题3参考答案
一.单项选择题
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
C
B
D
D
B
C
B
C
D
A
A
A
C
B
A
16
17
18
19
20
21
22
23
24
25
26
A
B
A
A
A
B
B
B
C
C
B
二.填空题
1.MultiLine,ScrollBars,2 (或Vertical)。
2.Label1.caption="a*b="。
3.height和width。
3、6,-2,2
4、
(1)x>100 And x Mod 5=0
(2)0
(3)len(Text1.Text)
习题5 参考答案
一、单项选择题
1
2
3
4
5
6
7
8
9
10
11
12
A
A
C
(1)C(2)C
B
C
A
D
D
Aห้องสมุดไป่ตู้
C
A
二、多项选择题
1
2
3
ABCD
BD
ABCDE
三、分析程序
1、(1)4次n=13 (2)3次n=8 (3)3次n=27 (4)1次n=12 (5)3次n=10
9、(1)Change (2)Value
习题6 参考答案
一、单项选择题
1
2
3
4
5
6
7
D
A
C
(1)A(2)B
D
C
A
1
2
3
E
DE
ABC
二、多项选择题
三、填空题
1、二12 1 3 -1 2
2、Name Index
3、(1)0(2)Text1(k).Text
习题7参考答案
一、单项选择题
1
2
3
4
5
6
7
8
9
D
C
14
15
①D,②D
①A,②C
A
B
B
C
A
D
B
B
A
B
B
A
B
16
17
18
19
20
21
22
23
24
25
26
A
B
B
B
B
B
D
A
B
A
D
二. 多项选择题
1
2
3
4
5
6
7
8
9
10
A,B
A,D
A,D
C,D,E
A,B,C,D,E
A,B,D
A,C,D,E
B,C
A,C
B,E
11
12
13
14
15
A,D,E
A,D
A,B,D,E
B,D
2、1
2
3
4
3、6
4、17
5、(1)Len(s)(2)Mid(s,k,1) (3)t & c (4)Text2.Text
6、(1)0(2)n+1(3)2^n
7、(1)Mid(x,p+3)(2) 3 (3)p
8、(1)Text1.Text (2)Len(s) (3)x>=〝a〞and x<=〝z〞Or x>=〝A〞and x<=〝Z〞(4) y & x
习题1参考答案
一.单项选择题
1
2
3
4
5
6
7
8
9
10
11
12
13
D
C
A
A
C
A
B
C
D
C
B
C
A
二. 多项选择题
1
2
3
4
ABCDE
BCDE
C
ABCD
三. 填空题
1.事件驱动
2.解释编译
3.属性、事件和方法。
4.窗体单击(Form_Click)。
5.代码
习题2参考答案
一.单选题
1
2
3
4
5
6
7
8
9
10
11
12
13