- 1、本文档共11页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
判断题
1.在VB中运算优先级别从高到低的顺序为:算术运算、运算、关系运算、逻辑运算。End if 语句对单行if语句不需要能够实现文本框接受多行文本显示的是将属性Multiline的属性值设为True…Loop While 语句时,不管条件真假,首先都会无条件地执行一次循环。
10.在Open语句中用Append方式打开的文件若不存在,则出现“文件未找到”的提示信息。
11.Visual Basic系统首先保存的是工程文件,然后才是窗体文件和其他文件。
12.许多属性可以直接在属性表上设置、修改,并立即在屏幕上看到效果。
13.块If结构中的Else子句可以缺省。
14.在Private Sub TT(byval y,t)过程中,形参y,t为按地址传递。
15.在窗体的通用部分,用Public定义的变量为模块级变量
16.虽然标签控件显示的文本在运行时不能编辑,但是可以通过程序代码进行改变。
17.当interval属性为0时,或Enabled属性为False时,定时器是不起作用的。
18.影像框和图片框一样,也可以作为其他控件的容器。
19.在设计Windows应用程序时,用户可以使用系统本身提供的某些对话框,这些对话框可以直接从系统调入而不必由用户用“自定义”的方式进行设计。
20.选中文件列表框File1中某个选项时,File1.FileName属性值为所选文件的全名。
选择题
1.Visual Basic 是一种面向对象的程序设计语言,_________不是系统所包含的三要素。 A.变量 B.事件C.方法 D.属性
A.只保存工程文件(.vbp)
B.分别保存工程文件、窗体文件和标准模块文件
C.分别保存工程文件和标准模块文件(.bas)
D.只保存窗体模块文件(.frm)
3.为了使窗体右移200(twip),应使用的语句是_______。
A.Form1.Move Width+200
B.Form1.Move 200
C.Form1.Move Form1.Height+200
D.Form1.Move Left+200
4.VB的一个应用程序至少包含一个_________文件,该文件存储窗体上使用的所有控件对象和有关的_______、对象相应的________过程和______代码A.模块、方法、事件、程序B.窗体、属性、事件、程序C.窗体、程序、属性、事件 D.窗体、属性、事件、模块下面的程序计算的数学式是_______。T=1
S=0
For I=1 to 19 step2
T=T*I
S=S+T
Next I
Print S
A.1+3+5+...+19B.1+1*3+1*3*5+...+1*3*5*...19C.1*3*5*...*19D.1!+3!+5!+...+19!执行下列程序,从键盘输入10,运行结果是_______。Private Sub Command1_Click()S=InputBox(请输入一个数字:)Select Case S
Case Is0
Print 0
Case Is3
Print3
Case Is5
Print 5
End Select
End Sub
A.3B.0C.出错D.5InputBox函数返回值的类型为_____。 A.数值 B.字符串C.数值或字符串(视输入的数据而定)D.变体
A=1
If A0 then A=A+1
If A1 then A=0
A.3 B.2
C.1 D.0
9.若要设置文本框中所显示的文本颜色,应设置_________属性的值
A.Color B.FillColor
C.BackColor D.ForeColor
10.当运行程序时,系统自动自动执行启动窗体的_________事件过程。
A.Load B.Click
C.UnLoad D.GotFocus
11.表达式23\4/2 mod 2*2的值是A.3 B.2 C.1 D.4
12.执行下列代码的结果是_______。Private Sub Command1_Click()Dim a(10)
For I= 1 To 10
a(I)=I*10Next I
Print a(I
文档评论(0)