陕西师范大学 Vb题库及上海大学个人理财A卷答案.docx

1、陕西师范大学 Vb题库及上海大学 个人理财A卷答案1、当在文本框中输入“ABCD”时，标签上显示的是（AABABCABCD）。Sub TextBox1_TextChanged() Handles TextBox1.TextChanged Label1.Text &=TextBox1.TextEnd Sub2、逻辑运算符：与、或、非 中优先级最高的是（非）3、可以同时删除字符串前导和尾部空白的函数是(Trim )4、如果要将窗体中的某个命令按钮设置成无效状态，应该设命令按钮的何种属性（Enabled）5、已知a=3.5,b=5,c=2.5,d=True,则表达式a=0ANDa+cb+3 Or N

2、OT d的值(是FALSE)6、在过程中定义的变量，若希望在离开该过程后还能保存过程中局部变量的值，应使用（Static）关键字在过程中定义过程级变量。7、用于Visual Basic程序设计的控件在（ 工具箱中 ）。8、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是(代码窗口 )9、要使TextBox控件能够显示多行，应设置（MultiLine）属性为True10、若要使命令按钮不可操作，要对（Enabled）属性进行设置11、下列程序段的执行后，i和x的值为（7 40） Dim i, x As Integer I = 1 x = 5 Do i = i + 2 x *= 2 Loop

3、Until i = 612、关于循环叙述不正确的是：? ForNext循环中不能嵌套DoLoop循环13、在VisualBasic中，可以被称为对象的是(控件和窗体)14、整型变量x中存放一个2位正整数，要将两位数交换位置，例如，13变为31，实现的表达式是 (x mod 10) *10+x1015、定义字符串变量：Dim strInput As String=“VisualBasic2005”Dim strSubStr1 As String计算子串：strSubStr1 = strInput.Substring(2, 4) 则strSubStr的值为：（sual）16、下列控件中，没有Tex

4、t属性的是(Timer)17、表达式Len(123程序设计ABC)的值（是10）18、下列控件中，不能变大小的是(Timer )19、下面四个运算符中，优先级别最高的是（）20、枚举类型的第l个成员的默认值(是0)21、有以下过程,关于形参n的说法正确的是（形参n的变化影响实参）Public Sub F1（ByRef n as integer ）End Sub22、下面程序求两个数中的小数（if yx then #min1=y #end if#min1=x）不正确23、下面if语句统计满足年龄(age)小于40岁，职称(duty)为副教授以上条件的人数，正确的if语句判断表达式是(agex0表

5、示成正确的VB.NET表达式为（x0 and x030、下列说法正确的是（对象是有特殊属性和行为方法的实体）31、dim a（3，4），则a数组元素个数为20个，若dim b（3，0，5），则b数组元素个数为（是24）个32、在VB.NET的集成开发环境中，下面不属于该环境编程语言的是（PASCAL）33、以下属于中合法的数组元素的是 k(8)34、下列程序执行的结果为 s(165)Dim x, y, z As Integer x = 25 y = 20 z = 7 MessageBox.Show(S( & x + z * y & )35、vb2005采用事件驱动的编程方式，其中窗体的Pain

6、t属于（操作系统触发事件）事件。36、在VB集成开发环境中，下面不存在的窗口是 常见任务37、按照结构化程序设计要求，下面（goto语句）语句是非结构化程序设计语句38、在VB.net中，在窗体上设置标题文本，用（Text）属性设置39、表达式32Mod1423的值（是0）40、下面属于不合法的变量名的是 string41、以下（）是正确的ForNext结构。For x=3 to -3 Step -3Next x42、一语句要在下一行续写，用（下划线 _）符号作为续行符。43、下列各控件不包含滚动条的控件是(CheckBox)44、下列变量名中正确的是(Select_1 )45、以下（for

7、x=3 to -3 step -3 Next）是正确的forNext结构46、关于多分支选择叙述正确的是：多分支选择语句可以使用多种语句实现47、假定有以下程序段#Fori=1To3#Forj=6To0Step-2#Pow=i*j#Next#Next#则循环体语句的执行次数（是12）48、以下关于函数的叙述中，正确的是(函数形参的类型与函数返回值的类型没有关系)49、下列数组声明语句中正确的是（Dim a() As Single=1,2,3,4,5,6,7,8,9,10）。50、数学关系式3x10表示成正确的表达式为3x and x1051、在代码中引用一个控件时，应使用控件的(Name)属性

8、。52、以下不属于键盘事件的是(Unload )53、下列符号常量的声明中,( ConstaAsInteger=12 )是不合法的54、如果在程序中要将a定义为静态整型变量，则应使用的语句是(StaticaAsInteger)55、下面的语句错误的是：Dim dateBirthday As Date =1/30/199056、用来设置文本框有无滚动条的属性是(ScrollBars)57、下列赋值语句(sum = sum -sum )是有效的58、双精度浮点数存储时占的字节数是 (8 )59、关于Sub过程与Function过程，下面描述正确的是：Sub过程的过程不能直接返回值，而Functio

9、n过程能直接返回值60、在使用应用程序时，通常用作在单击时执行指定的操作的控件是 命令按钮61、对下列程序段，说法正确的是(btnQuit对象的左边界距窗体的左边界是10像素，上边界距窗体的上边界为80像素)#btnQuit.SetBounds(10,80,200,50)62、下列数组定义错误的是 dim a(3) as integer=1,2,3,463、下面正确的赋值语句是（y=x+10）64、Do Loop循环语句的格式为：Do 语句块Loop则对其叙述正确的是： 该循环过程也可以控制循环次数65、下列哪种结构不是结构化程序设计的基本结构 递归66、在设计阶段，双击窗体Form1的空白处

10、，打开代码窗口，显示下面哪个事件过程Form1_Load67、RadioButton控件中的（Checked ）属性记录了控件选中与否的状态。68、提供了结构化程序设计的是那种基本结构，它们是 顺序、选择、循环69、要使当前窗体的标签控件lblshow显示“欢迎使用VB.NET”，以下（lblshow.text=“欢迎使用VB.net”）语句是正确的70、结构化程序设计所规定的三种基本控制结构是(顺序、选择、循环)71、以下的控件或方法具有输入和输出双重功能的为(Textbox)。72、Timer控件默认的事件是(Tick事件)73、要对项目进行严格类型检查设置，应该使用（项目）菜单中的命令7

11、4、用于从字符串左边截取字符的函数是(Ltrim( ) )75、以下叙述中正确的是(窗体的Name属性指定窗体的名称，用来标识一个窗体 )76、下面合法的变量名是（X_yz）。77、引用列表框ListBox1最后一个数据项应使用（ListBox1.Items(ListBox1.Items.Count-1)）。78、以下哪个不是关键字（ForLoop ）79、如果要将文本框作为密码框使用时，应设置的属性为 PasswordChar80、有以下过程Public Sub F1（ByRef n as integer ）n=3*n+4End Sub若n、m都被定义成整形变量，并且分别赋值为3、4，那么正

12、确的调用语句是（F1(m)）。81、表达式2*32+2*8Mod4+23的值(是26)82、“x是小于100的非负数”，用Visual Basic表达式表示正确的是(0=x And x100 )83、窗体Form1的Name属性为Myfrm,则它的load事件过程名为(Myfrm_load )-中间有一个下划线84、复选框或单选钮的当前状态可通过（Value）属性来返回或设置85、初学者、业余爱好者在开发基于windows的应用程序时适宜使用的开发工具是（Visual Studio 2005 Express Edition）。86、下列程序段的执行后，变量a,k的值分别为 （ 1 5 ）Dim

13、 a,k as integera=5For k=1 To 0a=a * kNext k87、若m，x，y，均为Integer型变量，则执行下面语句后m值是 ( -1 ).m=1：X=2：Y=3；m=IIf(XY，X+Y，X-Y)88、定义字符串变量：Dim strInput As String=“VisualBasic2005”Dim strSubStr1 As String计算子串：strSubStr1 = strInput.Remove(2, 4) 则strInput的值为： ViBasic200589 、Timer控件的Interval属性的单位是 (毫秒)90、下面的变量定义错误的是：

14、 Dim 120 As Byte91、有过程： Private Function Max(ByRef x As Integer, ByRef y As Integer) As Integer If x y Then Max=y Else Max=x End If End Function 如果： Dim a, b, c As Integer a = 10 b = 23 c = Max（a,b） 则a,b,c的值依次是： 10,23，2392、Visual Basic的特点不包括下面的 (不需编程)93、在设计状态，列表框中的选项可以通过（Items）属性设置94、下列赋值语句正确的是 (A=B

15、+C )95、下面叙述不正确的是：一个控件只能有一个事件处理过程96、阅读程序：#PrivateSubCalculate()#DimSAsInteger=0#ForkAsInteger=1To15#S+=kMod3#Next#MessageBox.Show(“S的值为：”&S,”输出结果”)#Endsub#程序运行后，弹出的消息框显示S的值 (是15)97、下列程序段不能分别正确显示 1！、2！、3！、4！的值的是（）。n=1For j=1 to 4 n=n*jNext jMessageBox.show(n,i&!)98、在代码窗口，代码下有蓝色波浪线表示 语法错误99、不论任何控件，共同具有

16、的属性是（Name）。100、在VB.NET的集成开发环境中，下面不属于该环境编程语言的是（Pascal）101、关于算法的描述正确的是：? 算法执行的目的是通过对相关数据的处理，得到一个或多个结果输出内容102、以下四个算术运算符中，优先级别最低的是 mod103、Dim x,y as Integer # x=2 # If xb and 93 的值为 Fasle122、为把圆周率的近似值3.14159存放在变量PI中，应该把变量PI定义为(DimPIAsSingle)123、对于整数intX0,100，在Visual Basic中正确的写法是：intX=0 And intX0,xMod3,0

17、)，设x=10，则y的值（是1）133、Dim str,str1 As String # str=ABCABBABA # str1=AB # 那么 str.Indexof(str1， 2) 的值为（是3 ）134、以下变量名是正确的（是_a1）135、引用列表框ListBox1最后一个数据项应使用（ListBox1.Items(ListBox1.Items.Count-1)）。136、当窗体上有多个控件时，最多只有 (1 ) 个控件是活动的137、当对被选择的控件进行对齐、调整大小等操作时，将以 ( 基准控件 )为准138、定义枚举类型的变量用的关键字是( Enum)139、按照匈牙利表示法，

18、TextBox控件的前缀是（txt）140、下面4个选项中属于字符型数据的是( Hello )141、调用子过程后可以通过形参来改变两个实参值的语句是（Sub f3(ByRef n as integer,ByRef m as Integer)）。142、下面叙述不正确的是 对象和类有时也指同一概念143、数学关系式x10或者x0表示成正确的表达式为 x10144、由单精度浮点型的数据组成的字节数是 (4 )145、下列符号常量的声明中，不合法的是(Const a As Double = Sin(1)146、Dim x As integer = 3-x=x/2 x的值为 (是2)操作题1、请编写

19、函数f(a)，其功能是：计算一个长度为5的一维整形数组a中最大值与最小值的差，并作为函数的返回值。# 例如：从文本框中输入1 5 8 9 2，差为8。# 数组中的值需要自己在文本框中输入。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）。Dim max As Integer = a(0)Dim min As Integer = a(0) For i As Integer = 0 To 4 If max a(i) Then min = a(i) End If Next Return (max - min)2、请编写函数f(x)，其功能是：

20、根据下面的公式，计算通过文本框输入的x的值对应的y值。 # 计算公式为x-1时，yx；1x0时，y=2x;x0 时，y5x+1。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）。If x -1 Then Return x ElseIf x 0 Then Return (2 * x) Else Return (5 * x + 1) End If3、请编写函数f(x)，其功能是：判断一个大于或等于3的正整数是否是素数， # 如果是素数函数返回1，否则返回0。例如：输入37，函数返回1；输入40，函数返回0。# 注意：不得改动程序已有的任何代

21、码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“判断”按钮）。Dim i As Integer For i = 2 To x If x Mod i = 0 Then Exit For End If Next If x = i Then Return 1 Else Return 0 End If4、请编写函数fun()，其功能是：计算2-500之间（包括2，500）素数的个数,并将其作为返回值。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）。Dim m, n, p As Integer p = 1 For m = 3 To

22、500 For n = 2 To m If m Mod n = 0 Then Exit For End If Next If m = n Then p = p + 1 End If Next Return p5、请编写函数fun()，其功能是：计算a到b之间“个位数与十位数相等”的数的个数（包括a,b），并返回该值。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）For x As Integer = a To b If (x Mod 10) = (x Mod 100) 10 Then fun = fun + 1 End IfNext R

23、eturn fun6、请编写函数fun(a)，其函数功能是：计算a的阶乘，并返回结果。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）If a = 0 Then fun = 1 Else fun = a * fun(a - 1) End IfReturn fun7、请编写函数fun(a，b)，其函数功能是：计算a到b区间内（包括a、b）所有不能整除3的整数之和，并返回结果。窗体上已经给出a,b的值。# 例如：a=1,b=4。处理后，结果为 7。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“

24、计算”按钮）For i As Integer = a To b If i Mod 3 0 Then fun = fun + i End If Next Return fun8、请编写函数fun(a，b)，其函数功能是：计算a到b区间内（包括a、b）所有除3余数为2的整数之和，并返回结果。窗体上已经给出a,b的值。# 例如：a=1,b=4。处理后，结果为 2。# 注意：不得改动程序已有的任何代码。编写完成后至少执行一次你的程序以验证正确性（运行后点击“计算”按钮）For i As Integer = a To b If i Mod 3 = 2 Then fun = fun + i End IfNextReturn fun9、完成fun(a,b)函数，要求实现a到b的累加,并返回结果。启动调试后，点击累加按钮就会调用fun函数，a和b会被自动赋值1和100(即a和b不需要再声明和赋值，直接使用即可)，在窗体控件textbox1中会显示调用fun()函数的结果！# 注意：不要改动fun以外的任何代码！代码编写完成后一定要启动调试，并点击累加按钮执行！For i As Integer =