Vb程序设计试题.doc

《Vb程序设计试题.doc》由会员分享，可在线阅读，更多相关《Vb程序设计试题.doc（5页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、Vb程序设计试题一、填空（）1。Vb应用程序具有两个基本特点：可视化设计和 。2。 和控件是创建界面的基本构件，也是创建应用程序所使用的对象。3。为了了解windows的工作机制，至少需要理解三个关键概念：窗口、 和消息。4。创建vb应用程序有三个主要步骤：（1）创建应用程序界面。（2）设置属性。（3） 。5。Vb程序存储在模块中，模块分为窗体、类和 三类模块。6。在vb程序中使用变量，除了正确的 之外，还要根据变量所表示的内容正确地声明其数据类型。7。运算符是用来 进行各种运算的操作符号。8。当开发一个应用程序时，可以使用一个工程来管理组成应用程序的 。9。典型的vb应用程序包括若干模块，每

2、个模块包含若干含有代码的过程，因而呈现 结构。10。在计算机中，文件随着分类方法的不同，名称也各不一致。按着文件的数据编码方式来分，可以分为 和二进制文件。二、单项选择题（）1。标签控件提供了在窗体相对固定的位置显示文件的区域，和它具有同样功能的控件是（）A.文本框 B.命令按钮C.图片框 D.以上各控件都不对2。文本框不具有的属性是（）A。Multiline B.CaptionC。Font D.Height3。命令按钮不具有的属性是（）A。Font B.MultilineC。Enabled D.Visable4。单选按钮不具有的属性是（）A。Value B.CaptionC。Text D.F

3、ont5。复选框不具有的属性是（）A。Value B.CaptionC。BackColor D.Default6。列表框图标的英文名称是：（）A。ListBox B.ComboBoxC。Frame D.CommonDialog7。PictureBox图标的中文名称是（）A。图片框图标 B.图片框图标C。计时器图标 D.以上都不是8。图像框和图片框的区别是（）A。图像框使用的系统资源比图片框多 B.图像框重新绘图速度快C。图片框重新绘图速度快 D.以上都不对9。图片框没有的属性是（）A。Picture B.AppearanceC。AutoRedraw D.以上属性都没有10。计时器没有的属性是（

4、）A。Interval B.EnableC。Size D.Index三、判断下列各题是否正确，若不正确请修改或说明原因。1。4AB和AB都可以作为VB的变量名。2。变量名的长度最长可达225个字符。3。下列程序运行结果是：3，3 Option Explicit Private Sub Command1_Click() Dim a, b As Integer a= 3.6 b=3.6 Text1.Text= a Text2.Text= b End Sub4。下列程序运行结果是：2Option ExplicitPrivate Sub Command1_Click() Public Const a

5、As Integer =2 Text1.text=aEnd sub5。定义定长字符串，最长可达64KB个字符。6。Empty与Null都表示Variant变量为空。7。下列程序运行结果：False。 Private Sub Command1_Click() a=1b=2 c=3 text1.Text=ca+b OR b-1c-1 And c+aa Xor bc-2End sub8。一个工程的文件可以被其它工程文件共享。9。标准模块是程序中的一个独立容器，包含全局变量，Function(函数)过程、Sub过程（子过程）和窗体模块。10。所谓文件是指存放在内存中的数据和程序等。四、读程序体，写出程

6、序运行结果（）1。当输入如下数据按确定，下列程序运行结果是什么？Dim flag BooleanDim inputName as stringPrivate sub form_Load()UserName(1)=”LiMing”UserName(2)=”wangfang”UserName(3)=”zhangsan”UserName(0)=”xuhua”Flag=FalseinputName=InputBox(“请输入您的用户名称：”，”用户身份确认”，”)Dim i As IntegerFor i= 0 to 3 If inputName=UserName(i) ThenFlag=true E

7、nd IfNext ifIf Flag=False ThenElse MsgBox “欢迎您！” + inputName + “先生” ，vbOKOnly , “欢迎您！”End IfEnd Sub2。Option Explicit Private Sub Command1_Click() Static S As Integer Dim I As Integer S=1 For I =1 to 5 S=S*i Next i Print SEnd Sub3。Private Sub Form_Click() For I =15 to 18 Print “*”; For j=3 to 6 step

8、1 Print “*”; Next j Print Next iEnd Sub4。分析下列程序，单击窗口时，程序运行结果。Private Function Fac() As StringFac = “,”End FunctionPrivate Sub Form_Click() Dim I as Integer For I=1 to 5 Command1_Click Print Fac(); Command2_Click Next IEnd SubPrivate Sub Command1_Click() Print “您好”；End SubPrivate Sub Command2_Click()

9、 Print “VB!”End Sub五、编程题()1。有一个可作1到100以内加减乘除计算的程序。该程序用户界面如图所示，它由四个文本框（text1、text2、text3、text4）,和两个按钮；命令按钮1（command1）、命令按钮2(command2)等组成，text2用来输入运算符，text1、text2分别用来输入操作数，text4用来显示结果。程序运行，可在相应的文本框中输入数据和运算符，按计算按钮后，则检查输入数据和运算符，若正确则进行相应的计算，并把结果显示出来，否则，则显示提示。程序清单如下，请补充完整。Private Sub Command1_Click() Dim

10、a As Integer , b As Integer If Not IsNumeric(Text1.text) Then MsgBox “输入数1只能为数字” Text1. = “ ” Text1.SetFocus Exit SubEnd IfIf Not IsNumeric (Text3.Text) Then MsgBox “输入数2只能为数字” Text3.Text = “” Text3.SetFocus Exit Sub a=Val( )b=Val( )If a100 Then MsgBox “输入数只能在0到100之间” Text1.text = Text1. End IfIf b1

11、00 Then MsgBox “输入数只能在0到100之间” Text3.text= “ ” Text3.SetFocusEnd IfOp= Select Case op Case “+” r = a + bCase “-” r = a bCase “*” r = a * bCase “/ ” If Then MsgBox “除法运算的操作的除数不能为0” Text3.Text = “ ” Text3.SetFocus Exit SubEnd Ifr = a/b Case ElseMsgBox “运算符非法，请重新输入”Text2.Text = “ ”Text2.SetFocusExit En

12、d Text4= rEnd SubPrivate Sub Command2_Click()End End Sub Private Sub Form_Load() Text1= “” Text2= “” Text3= “” Text4= “”End Sub一到简单的vb程序题回答：1 浏览：140 提问时间：2008-09-02 23:01Private Sub Command2_Click() For i = 1 To 3 x = 1 For j = 1 To 3 x = 3 + j For k = 1 To 3 x = x + 3 Next k Next j Next i Print x End Sub 运行程序后，单击命令按钮，输出结果是 。 Private Sub Form_Activate() Dim sum As Integer Dim I As Integer sum = 0 For I = 1 To 100 sum = sum + I Next I Print 1到100的和为; sum End Sub