给立信大一考vb的童鞋们.docxVIP

  • 5
  • 0
  • 约1.93万字
  • 约 25页
  • 2018-09-04 发布于江苏
  • 举报
给立信大一考vb的童鞋们

给立信大一考vb的童鞋们~立信的题库哦,你们懂的 【期末】VB考试客观题 VB考试一 1、能够获得一个文本框中被选取文本的内容的属性是______。 A:SelStart B:SelLength C:SelText D:Text 参考答案:C 2、在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应当使用的语句为:______。 A:Text1.Enabled = False B:Text1.Hide C:Text1.Clear D:Text1.Visible = False 参考答案:D 3、对于语句 If x=1 Then y=1, 下列说法正确的是____。 A: x=1和y=1 均为赋值语句 B: x=1和y=1 均为关系表达式 C: x=1为赋值语句,y=1为关系表达式 D: x=1为关系表达式,y=1 为赋值语句 参考答案:D 4、以下变量名中,______是不符合Visual Basic的命名规范的。 A:_mnu_Open_234 B:Abc901 C:price_ D:K 参考答案:A 5、MsgBox 函数返回值的类型是__________。 A:数值或字符串 B:字符串 C:变体 D:整型数值 参考答案:D 6、VB一共有设计、运行和中断三种模式,要使用调试工具应该______。 A:进入中断模式 B:进入运行模式 C:进入设计模式 D:不用进入任何模式 参考答案:A 7、设a=6,则执行 x=IIF(a5,-1,0) 后,x的值为______。 A:-1 B:6 C:0 D:5 参考答案:A 8、可以同时删除字符前导和尾部空白的函数是______。 A:Mid B:Rtrim C:Trim D:Ltrim 参考答案:C 9、以下语句的输出结果是______。 Print Format$(32548.5,000,000.00) A:32,548.5 B:32548.5 C:032,548.50 D:32,548.50 参考答案:C 10、设有如下声明: Dim X As Integer 如果Sgn(X)的值为-1,则X的值是______。 A:等于0的整数 B:大于0的整数 C:整数 D:小于0的整数 参考答案:D 11、在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1 To 3 x = 3 For k = 1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是______。 参考答案: 15# 15 #15 #15 12、执行下面的程序段后,S的值为______。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i 参考答案:9 13、下列表达式有错误,正确的写法应该是______。 [(a+b)+c]/80-5÷(d+e) 参考答案:(a+b+c)/80-5/(d+e)#(a+b+c)/80-5/(d+e) 14、表示x 是5的倍数或是9的倍数的逻辑表达式为__________ 参考答案:x Mod 5 = 0 Or x Mod 9 = 0#x Mod 9 = 0 Or x Mod 5 = 0 15、以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。 Private Sub Form_click() Dim x, y As Single Dim z As Integer x = InputBox(Enter a score) Do while x=0 y = y + x z = z + 1 x = InputBox(Enter a score) Loop If z = 0 Then z = 1 End If y = ______ Print y End Sub 参考答案:y/z VB考试二 1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。 A:ListIndex B:ListCount C:Count D:Index 参考答案:B 2、在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。 A:Private Sub List1_Click() Label1.Caption=List1.Text End Sub B:Private Sub List1_Click() Label1.Name=List1.ListInde

文档评论(0)

1亿VIP精品文档

相关文档