VB题库1

1.以下叙述中错误的是()。A)标准模块文件的扩展名是.basB)标准模块文件是纯代码文件C)在标准模块中声明的全局变量可以在整个工程中使用D)在标准模块中不能定义过程【解析】标准模块独立保存为标准模块文件.bas，故A选项正确。标准模块是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大，含有多个窗口，而且几个窗口需要写重复的过程、变量等代码时，就可以把这些重复的代码写在标准模块。故B选项正确。在标准模块中定义的Public变量、Public过程属于全局变量和全局过程，在整个工程中的其他窗体、模块都可以使用。故C选项正确，在标准模块中可以定义过程，故D选项错误2.在VisualBasic中，表达式3*2\5Mod3的值是（）。A)1B)0C)3D)出现错误提示【解析】VB中自述运算符优先级从高到低：乘方^负号-乘除*、/整除\取模Mod加减+、一。根据优先级顺序，先计算3*2为6，再6\5整除为1，最后1mod3取模结果为1。故A选项正确。设a＝4，b＝5，c＝6，执行语句PrintabAndbc后，窗体上显示的是()。A)TrueB)FalseC)出错信息D)0【解析】Print语句中计算表达式的值，按运算符的优先级顺序，关系运算符比逻辑运算符And优先级高。先计算，结果为TrueAndTrue，再计算And，结果为True，故选A。执行下列语句：strInput＝InputBox(请输入字符串，字符串对话框，字符串)将显示输入对话框。此时如果直接单击确定按钮，则变量strInput的内容是()。A)请输入字符串B)字符串对话框C)字符串D)空字符串【解析】InputBox函数的格式：变量名＝InputBox(提示信息[，标题栏显示信息][，输入文本框中默认值][，X][，Y])InputBox函数的功能：在一输入对话框中显示提示，等待用户在输入文本框中输入数据，然后按下按钮，返回文本框内容。如果用户单击确定按钮，则InputBox函数把输入文本框的内容作为一字符串返回；如果没有输入数据，按确定按钮，则返回的是空字符串；如果按取消按钮，则不管输入框有没有输入数据，都返回空字符串。根据以上所述，运行程序，会出现一输入对话框，在上面有请输入字符串提示信息，标题栏中显示字符串对话框，输入文本框中有默认值字符串，单击确定按钮后，文本框中的字符串三个字作为字符串返回给strInput变量。所以strInput变量的内容是字符串，故选C。以下变量名中合法的是()。A)x2－1B)printC)str_nD)2x【解析】VB中变量名的命名规则：①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。本题中x2－1中有－(减号)，不是下划线。print是VB的保留字，也不能作变量名。2x以数字开头，也是错误的。故C选项正确。下面是求最大公约数的函数的首部：Functiongcd(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是()。A)Printgcd(8,12)，gcd(12,16)，gcd(16,8)B)Printgcd(8,12,16)C)Printgcd(8)，gcd(12)，gcd(16)D)Printgcd(8，gcd(12,16))【解析】调用函数过程时的实参与函数过程的形参必须是类型、顺序、个数相同。本题中函数过程的形参有2个，调用时实参也要是2个，故排除选项B和C。选项A虽然语法没错误，但不符合题意。选项D是正确的。调用函数过程时可以嵌套调用。若在窗体模块的声明部分声明了如下自定义类型和数组：PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是()。A)Printarr.Code(2)，arr.Caption(2)B)Printarr.Code，arr.CaptionC)Printarr(2).Code，arr(2).CaptionD)PrintCode(2)，Caption(2)【解析】定义一个自定义类型的数组，数组元素表示为：数组名(下标).成员名，故选C。为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为()。A)DimpiAsIntegerB)Dimpi(7)AsIntegerC)DimpiAsSingleD)DimpiAsLong【解析】单精度Single或双精度Double型的变量能够保存浮点型小数，整型Integer和长整型Long的变量只能保存整型数据。本题中圆周率为3.14159，小数，可用定义一个Single或Double型变量来保存。故选C。表达式2*3^2+4*2/2+3^2的值是（）。A)30B)31C)49D)48【解析】根据VB中算术运算符的优先级计算。先计算^，即2*9+4*2/2+9；再计算*/，即18+4+9；最后计算+，结果为31，故选B。设窗体上有一个列表框控件List1，含有若干列表项。以下能表示当前被选中的列表项内容的是()。A)List1.ListB)List1.ListIndexC)List1.TextD)List1.Index【解析】List1的List属性是设置或返回列表框中的列表项内容；ListIndex属性设置或返回当前选中的列表项的索引值；Index属性是用来区分列表框控件数组中各List控件；Text属性设置或返回当前所选中列表项的文本内容。故选C。在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是()。A)PrivateSubText1_Change()Label1.Caption＝Str(Len(Text1.Text))EndSubB)PrivateSubText1_Click()Label1.Caption＝Str(Len(Text1.Text))EndSubC)PrivateSubText1_Change()Label1.Caption＝Text1.TextEndSubD)PrivateSubLabel1_Change()Label1.Caption＝Str(Len(Text1.Text))EndSub【解析】根据题意可知，在文本框中输入字符这个动作使标签上显示的内容发生变化，说明是文本框触发了某事件，排除D选项；文本框中每输入一个字符，标签中立即就会发生变化，故是Change事件，排除B选项；标签中显示的是文本框中字符的个数，不是输入的内容，排除C选项。故A选项正确。设窗体上有名称为Option1的单选按钮，且程序中有语句：IfOption1.Value＝TrueThen下面语句中与该语句不等价的是()。A)IfOption1.ValueThenB)IfOption1＝TrueThenC)IfValue＝TrueThenD)IfOption1Then【解析】A选项中Option1.Value可作为一个条件表达式，它返回的是单选按钮Value属性的属性值，根据属性值就可判断出单选按钮是否被选中；B选项中Option1等价于Option1.Value；D选项与A选项等价，故A、B、D选项均与程序中语句等价；C选项中Value是属性名，前面必须加控件名才能用，不能单独使用，故C选项错误。设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是()。A)程序运行时，若使滚动块向左移动，滚动条的Value属性值就增加B)程序运行时，若使滚动块向左移动，滚动条的Value属性值就减少C)由于滚动条的Max属性值小于Min属性值，程序会出错D)由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动【解析】水平滚动条的Max和Min属性值可以是0～32767中任意值。当MaxMin属性值时，滚动块向右移动Value属性值增加，向左移动Value属性值减少；反之，当MaxMin属性值时，滚动块向右移动Value属性值减少，向左增加；当它们Max＝Min时，滚动块不能移动。故A选项正确。为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是()。A)按住Alt键，不要松开，然后单击每个要选中的控件B)按住Shift键，不要松开，然后单击每个要选中的控件C)按住Ctrl键，不要松开，然后单击每个要选中的控件D)拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内【解析】按住Alt键只能选中单个控件，不能同时选中多个控件。故选A。在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为()。A)Text1.ClearB)Text1.Visible＝FalseC)Text1.HideD)Text1.Enabled＝False【解析】文本框没有Clear和Hide方法，故A、C选项错误；Enabled属性设置文本框可用不可用，属性值为True时可在文本框中输入数据，为False时文本框为灰色，内容不能修改，故D选项错误；Visible属性用来设置文本框显示或隐藏，当属性值为True时文本框显示，为False时文本框隐藏，故B选项正确。设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。A)PrivateSubTimer1_Timer()Label1.Caption＝TrueEndSubB)PrivateSubTimer1_Timer()Label1.Caption＝Time$EndSubC)PrivateSubTimer1_Timer()Label1.Interval＝1EndSubD)PrivateSubTimer1_Timer()Fork＝1ToTimer1.IntervalLabel1.Caption＝TimerNextkEndSub【解析】Timer1的Interval属性值是1000，Enabled属性为True，说明定时器开始工作，每隔1000毫秒(即1秒)触发一次Timer事件，从而执行一次Timer事件过程。要想每秒在标签中显示一次系统时间，则在Timer事件过程中把系统时间赋给标签的Caption属性就能实现。故选B。按钮组成的控件数组Command1，其下标从左到右分别为0、1、2、3，窗体外观如图所示。命令按钮的事件过程如下：PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action＝1Case1CD1.ShowSaveCase2CD1.Action＝5Case3EndEndSelectEndSub对上述程序，下列叙述中错误的是()。A)单击打开按钮，显示打开文件的对话框B)单击保存按钮，显示保存文件的对话框C)单击打印按钮，能够设置打印选项，并执行打印操作D)单击退出按钮，结束程序的运行Action＝2，或用ShowSave方法都可显示文件另存为对话框；Action＝3，或用ShowColor方法都可显示颜色对话框；Action＝4，或用ShowPrint方法都可显示字体对话框；Action＝5，或用ShowHelp方法都可显示打印对话框；本题中，打开、保存、打印、退出按钮的下标(即Index值)分别是0、1、2、3，用Index值区分各命令按钮。当Index＝0时，CD1.Action＝1，说明单击打开按钮，会显示打开文件对话框；当Index＝1时，CD1.ShowSave，说明单击保存按钮，会显示文件另存为对话框；当Index＝3时，End，说明单击