vb设计题1

1、请设计一个由三角形的三个边，求一个三角形面积的VB 程序（要求：若己给的三条边的值，若三角形成立，就显示出结果；若这个三角形不成立，用消息函数MsgBox 输出“此三角形不成立”的提示）。

由数学上己知：s=(a+b+c)/2, Triangle=sqrt(s(s-a)(s-b)(s-c))
2、用s= n
1......111917151311+-+-+-+求π值，设n=15 3、设计一个项目, 变量的属性名任意, 窗体上的属性列表任意形式。

程序一运行时，窗体上的一个文本框和三个命令呈灰色，当鼠标移到文本框时，文本框和第一和第三个命令按钮变成可用。

当用户单击第一个命令按钮后，第一个命令按钮从窗体上消失，文本框出现“This is guy, he ’s very good!”, 第二个命令按钮变成可操作。

第三个命令按钮的功能是退出此工程。

4、用2π =..1
(7)
8765654343212-⨯⨯⨯⨯⨯⨯⨯⨯n n 求π值，设n=100 5、用s= n
1......111917151311+-+-+-+求π值，设n=21 6、设计一个程序，求任意一个十进制整数N 的各个位数之和，设M （M=4）为N 的位数。

例如：8563=》8+5+6+3=22 ：。

A、 AutoSize B、 Visible C、 Enabled D、 WordWrap 正确答案： A 解析：
42、当文本框的 MaxLength 属性值取________时，该文本框能容纳的字符数最多。
A、 256 B、 512 C、 0 D、 -1 正确答案： C 解析：
43、在一行语句内写多条语句时，每个语句之间用_____ ___符号分隔。
A、 ； B、 : C、 ， D、 、 正确答案： B 解析：
44、结构化程序由三种基本结构组成，下面术语中是三种基本结构之一的是______ _。
A、 递归结构 B、 选择结构 C、 输入输出结构 D、 过程结构 正确答案： B 解析：
45、在默认情况下，InputBox() 函数返回值的类型为______ __。
8、下列关于 VB 编程的说法中，不正确的是（ ）。
A、 事件是能被对象识别的动作 B、 方法指示对象的行为 C、 属性是描述对象特征的数据 D、 VB 程序采用的运行机制是面向对象 正确答案： D 解析：
9、下面所列符号中，_________不是数据类型说明符。
A、 !
B、 % C、 ？ D、 # 正确答案： C 解析：
A、 0.01*Int(100*(x+0.005)) B、 0.01*Int(x+0.005) C、 0.01*Int(100*(x+0.05)) D、 0.01*Int(x+0.05) 正确答案： A 解析：
24、从字符串变量 Cstr 中取左边 4 个字符，应使用________。
A、 Left(Cstr，4) B、 Left(Cstr，1，4) C、 Mid(Cstr，3，4) D、 Mid(Cstr，4，3) 正确答案： A 解析：

1．第1题单选题应用程序设计完成后，应将程序保存，保存的过程是（）A、只保存窗体文件即可B、只保存工程文件即可C、先保存工程文件，之后保存窗体文件D、先保存窗体文件（或标准模块文件），之后还要保存工程文标准答案：D您的答案：题目分数：5此题得分：0.0批注：2．第2题单选题下列不能打开属性窗口的操作是（）A、执行“视图”菜单中的“属性窗口”命令B、按F4键C、按Ctrl TD、单击工具栏上的“属性窗口”按钮标准答案：C您的答案：题目分数：5此题得分：0.0批注：3．第3题单选题 Visual Basic的编程机制是（）A、可视化B、面向对象C、面向图形D、事件驱动标准答案：D您的答案：题目分数：5此题得分：0.0批注：4．第4题单选题运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的（）事件A、CLICKB、DBLCLICKC、GOTFOCUSD、CHANGE标准答案：D您的答案：题目分数：5此题得分：0.0批注：5．第5题单选题下面不是VB工作模式的是（）A、设计模式B、运行模式C、汇编模式D、中断模式标准答案：C您的答案：题目分数：5此题得分：0.0批注：6．第6题单选题为了防止用户随意将光标置于控件上，应（）A、将控件的TABINDEX属性设置为0B、将控件的TABSTOP属性设置为TRUEC、将控件的TABSTOP属性设置为FALSED、将控件的ENABLED属性设置为FALSE标准答案：D您的答案：题目分数：5此题得分：0.0批注：7．第7题单选题在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的（）设置为0A、INDEXB、TABINDEXC、TABSTOPD、ENABLED标准答案：B您的答案：题目分数：5此题得分：0.0批注：8．第8题单选题可视化编程的最大优点是（）A、具有标准工具箱B、一个工程文件由若干个窗体文件组成C、不需要编写大量代码来描述图形对象D、所见即所得标准答案：C您的答案：题目分数：5此题得分：0.0批注：9．第9题单选题 VB应用程序的运行模式是（）A、解释运行模式B、编译运行模式C、两者都有D、汇编模式标准答案：C您的答案：题目分数：5此题得分：0.0批注：10．第10题单选题在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是（）A、Private Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubB、Private Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubC、Private Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubD、Private Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub标准答案：A您的答案：题目分数：5此题得分：0.0批注：11．第11题单选题以下能够触发文本框Change事件的操作是（）A、文本框失去焦点B、文本框获得焦点C、设置文本框的焦点D、改变文本框的内容标准答案：D您的答案：题目分数：5此题得分：0.0批注：12．第12题单选题如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（）A、文本框的MULTILINE属性值为TRUEB、文本框的LOCKED属性值为TRUEC、文本框的MULTILINE属性值为FALSED、文本框的LOCKED属性为FALSE标准答案：B您的答案：题目分数：5此题得分：0.0批注：13．第13题单选题决定标签（Label）显示的属性是（）A、TextB、NameC、CaptionD、Alignment标准答案：C您的答案：题目分数：5此题得分：0.0批注：14．第14题单选题 Visual Basic继承了Basic语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（）A、属性、事件、事件过程B、控件、窗体、事件C、属性、过程、方法D、属性、事件、方法标准答案：D您的答案：题目分数：5此题得分：0.0批注：15．第15题单选题任何控件都具有的属性是（）A、TEXTB、CAPTIONC、NAMED、FORECOLOR标准答案：C您的答案：题目分数：5此题得分：0.0批注：16．第16题单选题命令按钮的标题文字由（）属性来设置。

Visual Basic程序设计综合练习题一及答案一、单项选择题（每题3分，共45分）1．无论何种控件，共同具有的属性是（）。

A．Text 属性B．Caption属性C．Name属性D．Autosize属性2．当需要上下文帮助时，选择要帮助的内容，希望出现MSDN窗口及显示所需的帮助信息，应按的键是（）。

A．Help B．F10 C．F1 D．Esc3．为了保存一个Visual Basic应用程序，下列说法正确的是（）。

A．只保存窗体文件（.frm）B．只保存工程文件（.vbp）C．分别保存工程文件和标准模块文件(.bas)D．分别保存工程文件、窗体文件和标准模块文件4．在Visual Basic中，变量的默认类型是（）。

A．Integer B．VariantC．Double D．Currency5．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是（）。

A．Interval=0或Enabled=False B．Interval=0或Visible=False C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（）属性设置就有效。

A．MaxButton B．BorderSyleC．Width D．MinButton7．有程序代码如下：Text1.Text = "Visual Basic"，则Text1，Text ，和"Visual Basic"分别代表（）。

A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值8．要设置命令按钮的背景图形，必须设置的两个属性是（）。

A．Value和Icon B．Style和IconC．Caption和Picture D．Style和Picture9．在VB中，下列合法的变量名是（）。

11级计算机专业VB试题（一）一、选择题：１、运行工程的错误操作是（）A：执行“运行”菜单中的“启动”命令B：单击工具栏中的“启动”按钮C：按功能键“F5”D：按组合键“alt+f5”2、下列有关VB特点的描述有误的是（）A：VB是一种可视化、面向对象的程序设计语言B：VB采用事件驱动编程机制C：VB可用于开发Windows环境下的各类应用程序D：VB是非面向对象的程序设计语言。

3、以下叙述错误的是（）A：在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件B：以.bas为扩展名的文件是标准模块文件C：窗体文件包含该窗体及其控件的属性D：一个工程可以含有多个标准模块文件4、与传统的程序设计语言相比，VB最突出的特点是（）A：结构化程序设计B：程序开发环境C：事件驱动编程机制D：程序调试技术5、下列不能打开代码窗口的操作是（）A：双击窗体B：双击窗体上的某个控件C：单击窗体D：按“F7”键6、在8BBE计窗体时双击窗体的任何地方，可以打开的窗体时（）A：代码窗口B：属性窗口C：工程资源管理器窗口D：工具箱窗口7、下列标识符不能作为VB变量名的是（）A：ABCabeB：b1234C：28wedD：crud8、下列说法错误的是（）A：在同一模块不同过程中的变量可以同名B：不同模块中定义的全局变量可以同名C：引用另一模块中的全局变量时，必须在变量名前加模块名D：同一模块中不同级的变量可以同名9、下列描述不正确的是（）A某个子过程中声明的局部变量，其适用范围仅限定于该子过程内B：某个子过程中声明的局部变量，期生命周期仅限定于该子过程被执行过程中C：不同子过程中的局部变量可以具有相同的名称D：不同子过程的局部变量可以具有相同的名称10、声明一个变量为局部变量应该用（）A：local B：private C：static D：public11、语句Y=Y+1的正确含义是（）A：变量Y的值与Y+1的值相等B：奖变量Y的值存到Y+1中去C：将变量Y的值加1后赋值给变量YD：变量Y的值为112、下列符号不能作为VB中的变量名的是（）A：ABCD B：E0065400 C：123TWJGF D：zxy13、若要在代码编辑器窗口中规定输入的代码中的变量必须要显示声明，应在下列哪个选项中设置（）A：自动语法检测B：要求变量声明C：自动缩进D：Tab宽度14、下列属于不合法的常量是（）A：20000 B：100^6 C：123.5 D：10E+615、下列不合法的变量名是（）A：Print_Numl B：Abc% C：Const D：X1_y2_z316、关于变体变量，下列说法正确的是（）A：变量未加定义而直接使用，该变量变为变体变量，因此变体变量是无类型变量B：遍体变量占16字节的固定存储单元C：变体变量定以后，系统将变体变量初始化为数值0或空字符串D：设X为遍体变量，且X=“10”，则X=X+20是正确的语句17、下列符号常量的声明中，不合法的是（）A：Const a as single =1.1 B：const a =“OK”C：const a as double =sin（1）D：const a as integer ="12"18、下列关于声明变量的说法中，错误的是（）A：用显式声明变量的关键字Dim、Private、Static或Public来声明的类型B：用类型说明符标记变量的类型，其中Yype是类型标志C：用DefTrype语句声明变量的类型，其中Type是类型标志D：用Type<数据类型名>/End Type语句声明记录类型变量19、已知a=5，b=8，c=12，下列表达式的值为Ture的是（）1A：a>b and c<a B: a>b or c<aC:a>b xor c<a D:a>b eqv c<a20、下列程序段运行后窗体上输出结果为（）Private Sub Form_Click()a = 5:b = 6:c = 7:d = 8x = 3 > 2 * b Or a = c And b <> c Or c > dPrint xEnd SubA：1 B：Ture C：False D：2二、填空题。

Visual Basic程序设计期末综合练习题一一、单项选择题1.Visual Basic是一种面向对象的可视化编程语言,采取了(的编程机制。

A.从主程序开始执行B.按过程顺序执行C.事件驱动D.按模块顺序执行2.在Visual Basic中,窗体文件的扩展名为(。

A..vbpB..frmC..clsD..bas3.Visual Basic6.0集成开发环境有三种工作模式,下列不属于三种工作模式之一的是(。

A.设计模式B.编写代码模式C.中断模式D.执行模式4.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是(。

A.Text.MytextB.Mytext*TextC.Mytext.(TextD.Mytext.Text5.下列关于变量的说法不正确的是(。

A.局部变量在声明它的过程执行完毕后就被释放了B.局部变量的作用域仅限于声明它的过程C.静态局部变量是在过程中用Static语句声明的D.局部变量是指那些在过程中用Dim语句或Static语句声明的变量6.关于对象的属性不正确的是(。

A.对象的属性一般有属性名和属性值B.可通过属性窗口设置属性的值C.可通过程序代码设置属性的值D.对象的所有属性值均可在设计时设计7.在设计阶段,双击窗体上的某个控件时,打开的窗体是(。

A.工程资源管理器窗口B.工具箱窗口C.代码编辑器窗口D.属性窗口8.要在窗体的标题内显示“myfrm”,使用的语句是(。

A.Form.caption="myfrm"B.Form1.caption="myfrm"C.Form1.Print"myfrm"D.Form.Print"myfrm"9.在VB中,下列变量名不合法的是(。

A.file_1B.fileC.file-1D.file_1_210.在设计动画时,用时钟控件来控制动画速度的属性是(。

Visual Basic程序设计综合练习题一及答案一、单项选择题(每题3分，共45分）1．无论何种控件，共同具有的属性是（）。

A．Text 属性B．Caption属性C．Name属性D．Autosize属性2．当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息，应按的键是( )。

A．Help B．F10 C．F1 D．Esc3．为了保存一个Visual Basic应用程序,下列说法正确的是（）。

A．只保存窗体文件（。

frm）B．只保存工程文件(.vbp）C．分别保存工程文件和标准模块文件(。

bas)D．分别保存工程文件、窗体文件和标准模块文件4．在Visual Basic中,变量的默认类型是（)。

A．Integer B．VariantC．Double D．Currency5．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件,需要设置的属性是( ）。

A．Interval=0或Enabled=False B．Interval=0或Visible=False C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对下列( ）属性设置就有效。

A．MaxButton B．BorderSyleC．Width D．MinButton7．有程序代码如下：Text1。

Text = "Visual Basic"，则Text1，Text ，和"Visual Basic"分别代表( ）。

A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值8．要设置命令按钮的背景图形，必须设置的两个属性是（）。

A．Value和Icon B．Style和IconC．Caption和Picture D．Style和Picture9．在VB中，下列合法的变量名是（）。

图3-1 窗体运行界面
2.
在窗体上放1个标签Label1，1个命令按钮Command1，当窗体启动时使标签居于窗 体的中间，并显示系统的当前时间，命令按钮显示为"放大"，当单击命令按钮时， 将标签中显示放在1~3倍，并重新显示系统当前时间。如下图：
图3－2
3.
编一模拟简易计算器的程序，运行界面如图3-3示。
图3-3 简易计算器的运行结果
第四讲
程序的顺序结构
一、选择题 1. 设 x=2,y=5,下列语句中能在窗体上显示“A=7”的语句是 C A. Print A=x+y B. Print “A=x+y” C. Print “A=”;x+y D. Print “A=” +x+y 2. 语句 Print Format$(1234.56,”000,000.000”)的输出结果是 D A. 1234.56 B. 1,234.56 C. 1,234.560 D. 001,234.560 3. 运行下列程序段,在弹出的信息框的标题栏中显示的是 C x$ = ”Beijing Welcomes you” y$ = Left(x$,7) z$ = Right(x$,3) q$ = Mid(x$,9,8) MsgBox x$,y$,z$,q$ A. Beijing Welcomes you B. Beijing C. Welcomes D. you 4. 在窗体上画一个文本框（其中 Name 属性为 Text1） ，然后编写如下事件过程 Private Sub Form_Click() x = InputBox(“Enter an Integer”) y = InputBox(“Enter an Integer”) Text1.text = x+y End Sub 程序运行后，在输入对话框中分别输入 5 和 6，则文本框中显示的内容是 B A. 11 B. 56 C. 65 D. 出错信息 5. 执行语句： x = InputBox(“Afanda”,“Mummy”,“Alien”,,,“2012”) 则在对话框的输入区中显示的信息是 C A. Afanda B. Mummy C. Alien

VB程序设计考试（1）一、单选题（每题1分，共50题）1.Visual Basic 6．0集成环境的主窗口中不包括（ C ）。

正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是（）模式。

正确答案：AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False，则运行时（）。

正确答案：AA.文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容C.文本框中的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容4.控制名称都是系统的默认控件名，下列语句错误是（）。

正确答案：Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。

5.以下叙述中正确的是（）。

正确答案：A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%，abc!，abc$，abc#分别声明abc是（）。

正确答案：AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占（ A ）字节内存。

正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真，与它所连接的两个条件必须是（ C ）。

正确A.前一个为真，后一个为假B.前一个为假，后一个也为假C.前一个为真，后一个也为真D.前一个为假，后一个为真9.设a=6，则执行 x=iif(a>5,-1,0)后，x 的值为（ D ）。

习题 1一、叙述题1．简述事件驱动的程序设计原理。

2．简述VB具有哪些特点。

3．VB的集成开发环境由哪些元素组成？4．VB集成开发环境的工具栏能否自行定义？标准工具栏中包含一些什么按钮？5．当创建只有一个窗体的应用程序后，该工程涉及多少个要保存的文件？若要保存该工程中的所有文件，应先保存什么文件？后保存什么文件？若不这样做，系统有什么信息？6．简述用VB开发应用程序的一般步骤。

二、单选题1．VB是用于开发________环境下应用程序的工具。

A．DOS或Windows B．DOSC．Windows D．UNIX2．VB采用了________的编程机制。

A．可视化B．事件驱动C．面向过程D．面向对象3．窗体编辑器的主要功能是________。

A．设计窗体的外观B．编写源程序代码C．设计用户界面D．设置对象属性4．VB是________的应用程序的开发工具。

A．8位B．16位C．32位D．64位5．VB集成开发环境开发的应用程序不适宜的运行环境是________。

A．Windows32B．Windows 9XC．WindowsNT D．Windows20006．VB共有三个版本，按功能从弱到强的顺序排列应是________。

A．学习版、专业版和工程版B．学习版、工程版和专业版C．学习版、专业版和企业版D．学习版、企业版和专业版7．VB集成开发环境有三种工作模式，工作模式显示在________。

A．状态栏的最左方B．状态栏的最右方C．状态栏的中括号内D．标题栏的中括号内8．下面不属于VB集成开发环境三种工作模式之一的是________。

A．设计状态B．编写代码状态C．运行状态D．中断状态9．不能打开代码窗口的操作是________。

A．双击窗体设计器的任何地方B．按下F4键C．单击工程窗口中的“查看代码”按钮D．选择“视图”下拉菜单中的“代码窗口”10．工程文件的扩展名是________。

A．.frm B．.vbp C．.bas D．.frx11．窗体文件的扩展名是________。

VB程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。

(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。

(A) Forml.Caption=“欢迎使用VB”(B) Forml.Caption='欢迎使用VB'(C) Forml.Caption=欢迎使用VB(D) Forml.Caption="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。

(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。

(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。

(A) X_yz (B) 123ab。

(C) integer (D) X-Y6. 以下关系表达式中，其值为False的是A 。

(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。

(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。

(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。

VB程序设计2022年秋学期在线作业1一、单选题1：执行语句Open "C:StuData.dat" For Input As #2 后，系统()。

A将C盘当前文件夹下名为StuData.dat的文件的内容读入内存B在C盘当前文件夹下建立名为StuData.dat的顺序文件C将内存数据存放在C盘当前文件夹下名为StuData.dat的文件中D将某个磁盘文件的内容写入C盘当前文件夹下名为StuData.dat的文件中正确答案：A2：语句Dim AA(9,9)所定义数组AA的元素个数为A 18B 81C 100D 90正确答案：C3：表达式Int(Rnd(O)+1)+Int(Rnd(1)-1)的值是()。

A 1B 0C -1D 2正确答案：B4：在窗体模块的通用声明段中声明变量时，不能使用()关键字。

A DimB PublicC PrivateD Static正确答案：D5：新建一工程，将其窗体的(名称)属性设置为MyFirst，则默认的窗体文件名为()。

A Forml.frmB工程1.frmC MyFirst.frmD Form1.vbp正确答案：C6：通过设置ADO数据控件的()属性可以建立该控件到数据源的连接信息。

A RecordSourceB RecordSetC ConnectionStringD Database正确答案：C7：下列控件中，没有Caption属性的是()。

A框架B列表框C复选框D单选按钮正确答案：B8：模拟方形骰子投掷的表达式是()。

A Int(6 * Rnd(1))B Int( 1+6 * Rnd(1))C Int(6 * Rnd(1) -l)D Int(6 * Rnd(1)-1)正确答案：B9：引用列表框(List1 )最后一个数据项应使用()。

A List1.List(Listl1. ListCount)B List1. List(Listl. ListCount - 1)C List1. List(ListCount)D List l. List( ListCounr-1)正确答案：B10：以下可以作为Visual Basic变量名的是()。

编程题（40题）1、在文本框Text1中输入一个正整数N ，按“计算”命令按钮Command1，产生N 个0 ~ 100之间的随机整数，计算这N 个随机整数的平均数，显示在标签Label1中。

将编写的程序存盘，工程文件名为Ex12nnnn.Vbp ，窗体文件名为Ex12nnnn.Frm 。

（当N 足够大时，该平均值应趋向于50）。

Ex12nnnn.Vbp Ex12nnnn.FrmPrivate Sub Command1_Click ( )N = Val (Text1.Text)Sum = 0For k = 1 To NV = Int ( Rnd * 101 )Sum = Sum + VNext kLabel1.Caption = Sum / NEnd Sub2、在文本框Text1中输入一正整数N ，按“计算”命令按钮Command1，计算该数的阶乘N !，结果显示在标签框Label1中。

按“结束”命令按钮Command2 结束程序。

Private Sub Command1_Click （） Private Sub Command2_Click （） N = Val (Text1.Text) EndP = 1 End SubFor k = 1 To NP = P * kNext kLabel1= PEnd Sub3、 在文本框 Text1中输入一个字符串，按“排列”按钮 Command1， 将输入字符串中每两个相邻的字符之间插入一个空格，结果显示在标签框Label1 中。

按“结束”命令按钮Command2结束程序。

Private Sub Command1_Click （） Private Sub Command2_Click （）X = Text1.Text EndL = Len (X) End SubW = “”For k = 1 To L-1V = Mid (X, k, 1)W = W + V + “ ”Next kW = W + Right (X,1)Label1.Caption = WEnd Sub4、编写程序，从键盘输入任一x 的值，求分段函数的值（可用InputBox 函数）。

VisualBasic6.0程序设计试题一与答案一、判断题：1、移动框架时框架内控件也跟随移动，所以框架内各控件的Left、Top属性值也将随之改变。

（错）2、VB提供的几种标准坐标系的原点都是在绘图区域的左上角，如果要把坐标原点放在其它位置，则需要使用自定义坐标系统。

（对）3、若窗体的坐标刻度为“缇”、窗体上的图片框控件的坐标刻度为“磅”，则图片框的Left属性值的单位为“缇”。

（对）4、用Scale方法改变了窗体坐标系后，窗体的Left、Top属性值不变。

（对）5、将容器的FillStyle属性设置为0后，容器中已绘制的图形的填充样式都为实心。

（错）6、语句“Shape1.FillStyle = vbSolid”和“Shape1.FillStyle = 0”作用相同。

（对）7、用Cls方法能够清除窗体或图片框中用Picture属性设置的图形。

（错）8、用Cls方法可以清除组合框中的所有表项。

（错）9、Picture图片框既可用来显示图片和绘制图形，也可以用Print方法来显示文字。

（对）10、在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。

（错）11、框架控件和形状控件都不能响应用户的鼠标的单击事件。

（错）12、图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框控件的有关属性值。

（错）13、执行语句Pic1.Picture = ”c:\temp\a.bmp”，可以为图片框控件Pic1加载文件名为c:\temp\a.bmp的图形文件。

（错）14、Picture对象的AutoSize属性值为True时，表示该对象不管原来图片的大小，一律都自动调整为控件的大小尺寸，以便能够完整地显示该图片。

（错）15、图片框控件与影像框控件加载图形文件的方法相同。

（对）二、选择题：1、改变控件在窗体中的左右位置应该修改控件的（）属性？（B）A. TopB. LeftC. WidthD. Right2、要改变控件的宽度，应该修改控件的（）属性？（C）A. TopB. LeftC. WidthD. Right3、重新定义图片框控件的坐标系统，可采用该图片框的（）方法？（A）A. ScaleB. ScaleXC. ScaleYD. SetFocus4、容器的ScaleMode属性值为（）时，容器坐标系的每一个单位为一磅？（A）A. 2B. 1C. 4D. 65、改变了容器的坐标系后，该容器的（）属性值不会改变？（A）A. LeftB. ScaleLeftC. ScaleTopD. ScaleWidth6、无论怎样改变图片框控件P1的坐标系，其中心点的x，y坐标分别为（）？（B）A.(P1.ScaleLeft+P1.ScaleWidth)/2、(P1.ScaleTop+P1.ScaleHeight)/2B.P1.ScaleLeft+P1.ScaleWidth/2、P1.ScaleTop+P1.ScaleHeight/2C.P1.Left+P1.Width/2、P1.Top+P1.Height/2D.P1.Width/2、P1.Height/27、设置图片框控件PIC1的背景色为红色，可以执行语句（）？（B）A.PIC1.BackColor = QBcolor(1)B.PIC1.BackColor = 255C.PIC1.BackColor = RGB(0,0,255)PIC1.BackColor = RGB(0,255,0)8、要使Shape控件以实心方式填充，应该设置其（）属性？（B）A. FillColorB. FillStyleC. BackStyleD. Shape9、下列表达式中，（）不是蓝颜色的值？（C）A.vbBlueB. Rgb(0,0,255)C. QBColor(12)D. &HFF000010、下列表达式中，（）不是红颜色的值？（C）A.vbRedB. Rgb(255,0,0)C. QBColor(1)D. &HFF11、（）对象不能作为控件的容器？（C）A. FormB. PictureBoxC. ShapeD. Frame12、若在图片框上用绘图方法绘制一个圆，则图片框的（）属性不会对该圆的外观产生影响。

下列关于 VB 编程的说法中，不正确的是_D_______。

A.事件是能被对象识别的动作B.方法指示对象的行为C.属性是描述对象特征的数据D.VB程序采用的运行机制是面向对象在 Visual Basic 中最基本的对象是__B_____，它是应用程序的基石，是其他控件的容器。

A.文本框B.窗体C.标签D.命令按钮VB6.0 的__A_____版本，可供专业编程人员开发功能强大的组内分布式应用程序。

A.企业版B.学习版C.专业版D.初级版有说明语句： Dim x! ，则 x 是__B______类型的变量。

A.整型B.单精度浮点型C.长整型D.双精度浮点型下面所列符号中，__C_______不是数据类型说明符。

A. !B. %C. ?D. #为了给 x,y,z 三个变量赋初值 1，下面的赋值语句正确的是______C___。

A.x=y=z=1B.xyz=1C.x=1：y=1：z=1D.x=1，y=1，z=1判断整型变量 x 是奇数的表达式是_D_______。

A.x Mod 2 !=0B.x Mod 2 =0C.x Mod 3=0D.x Mod 2<>0用来确定一个控件在窗体上位置的属性是_D_______。

A.Width和 HeightB.Width或HeightC.Top或LeftD.Top和Left在默认情况下，InputBox() 函数返回值的类型为___D_____。

A.逻辑类型B.变体类型C.数值型D.字符串型在使用 InputBox 时，必须设置的参数是___B_____。

A.无B.提示C.标题D.缺省以下 Case 语句中错误的是__A_____。

A.Case Is>10 And Is<5B.Case 3,5,Is>10C.Case Is>10D.Case 0 to 10当字符型变量中第三个字符是 "C" 时，利用 MsgBox 过程显示 "Yes"，否则显示"No"，正确的条件语句是___A_____。

习题一1．运行Visual Basic 6.0需要什么样的最小硬件环境?【答】只要能运行Windows 9x或Windows NT即可。

2．当正常安装Visual Basic 6.0后，误把Windows 98子目录删除。

当重新安装Windows 98后，是否要再安装Visual Basic 6.0？【答】要再安装Visual Basic 6.0，因为安装Visual Basic 6.0时，有些VB程序系统自动安装在Windows 98子目录下，所以一旦删除了Windows 98子目录，就必须再次安装。

3．Visual Basic 6.0有学习版、专业版和企业版，怎样知道所安装的是哪个版本？【答】在启动Visual Basic 6.0的启动封面上，能显示对应的版本，见教材例1.1。

4．Visual Basic 6.0有多种类型的窗口，若想在设计时看到代码窗口，怎样操作？【答】执行[视图][代码窗口]命令或“工程资源管理器”窗口的“查看代码”按钮。

5．如何使各窗口显示或不显示？【答】执行[视图]菜单的对应窗口命令，显示相应的窗口；关闭窗口则不显示该窗口。

6．叙述Visual Basic的特点。

【答】见本章1.3小节“知识要点”习题二1．叙述建立一个完整的应用程序的过程。

【答】创建界面、设置属性、编写事件过程代码、保存并运行程序。

2．当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。

问该工程涉及到多少个文件要保存？若要保存该工程中的所有文件，正确的操作应先保存什么文件？若不这样做，系统会出现什么信息？【答】涉及到两个文件，应先保存窗体文件（.frm），再保存工程文件（.vbp）。

若是先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。

3．假定在Windows 98环境中，要保存工程文件时，若不改变目录名，则系统默认的目录是什么？【答】是VB98。

4．为了使一个控件在运行时不可见，应对该控件的什么属性进行何种设置？【答】将Visible属性设为False。

'注意：请在指定的事件内编写代码。

'-------------------------------------------------'【程序设计】1'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)求出100以内所有素数的和，并将结果输出到窗体上,并存入所给变量SUM中。

'-------------------------------------------------'【程序设计】2'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)求200~300之间既能被3整除又能被7整除的数。

并求出所有数之和存入变量SUM中。

'-------------------------------------------------'【程序设计】3'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100，' 结果输出在窗体上。

将结果存入变量S中。

'-------------------------------------------------'【程序设计】4？'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)在窗体上打印数列2/1,3/2,5/3,8/5,13/8…' 的前10项，并求其和。

'-------------------------------------------------'【程序设计】5?'-------------------------------------------------'题目：(事件)单击窗体。