作业辅导网

标题: 15秋学期《可视化程序设计Ⅰ》在线作业1 [打印本页]

作者: 李老师    时间: 2015-10-4 16:23
标题: 15秋学期《可视化程序设计Ⅰ》在线作业1
15秋学期《可视化程序设计Ⅰ》在线作业1

1.  下列不能打开菜单编辑器的操作是
A. 按Ctrl+E
B. 单击工具栏中的“菜单编辑器”按钮
C. 执行“工具”菜单中的“菜单编辑器”命令
D. 按Shift + Alt + M
正确答案:D      满分:5  分  得分:5
2.  在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程rivate Sub Command1_Click() c = 1234 c1 = Trim(Str(c)) For i = 1 To 4 Print  NextEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容1121231234则在下划线处应填入的内容为
A. "Right(c1,i)"
B. "Left(c1,i)"
C. "Mid(c1,i,1)"
D. "Mid(c1,i,i)"
正确答案:B      满分:5  分  得分:5
3.  下列叙述中正确的是
A. 在窗体的Form_Load事件过程中定义的变量是全局变量
B. 局部变量的作用域可以超出所定义的过程
C. 在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程
D. 在调用过程时,所有局部变量被系统初始化为0或空字符串
正确答案:C      满分:5  分  得分:5
4.  执行下面的程序段后,x 的值为。x=5For i=1 To 20 Step 2x=x+i\5Next i
A. 21
B. 22
C. 23
D. 24

5.  在窗体上有一个文本框控件,名称为TxtTime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ ()TxtTime.text=TimeEnd Sub在下划线上应填入的内容是
A. Enabled
B. Visible
C. Interval
D. Timer

6.  (1)在设计阶段,当双击窗体上的某个控件时,所打开的窗口是
A. "A) 工程资源管理器窗口
B. "
C. "B) 工具箱窗口"
D. C) 代码窗口
E.

7.  以下关于变量作用域的叙述中,正确的是
A. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用
B. 全局变量必须在标准模块中声明
C. 模块级变量只能用Private关键字声明
D. Static类型变量的作用域是它所在的窗体或模块文件

8.  窗体中有3个按钮Command1、Command2和Command3,该程序的功能是当单击按钮Command1时,按钮2可用,按钮3不可见,正确的程序是
A. Private Sub Command1_Click( ) Command2.Visible=True :Command3.Enabled=TrueEnd Sub
B. Private Sub Command1_Click( ) Command2.Visible=False:Command3.Enabled=False End Sub
C. Private Sub Command1_Click( ) Command2.Enable=True :Command3.Visible=FalseEnd Sub
D. Private Sub Command1_Click( ) Command2.Enabled=False : Command3.Visible=False End Sub

9.  假定有如下的Sub过程:Sub S(x As Single,y As Single)t = xx =t/y y =t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click ( )Dim a As SingleDim b As Singlea =5b =4S a,b Print a,bEnd Sub程序运行后,单击命令按钮,输出结果为
A. 5 4
B. 1 1
C. 1.25 4
D. 1.25

10.  关于Line语句正确的说法是
A. Line只能绘制直线
B. Line可以绘制矩形,但是不可以设置填充色
C. Line在绘制矩形,填充色由FillColor属性决定
D. Line在绘制矩形,填充色由forecolor属性决定

11.  software and hardwarB) softwareC) hardwareD) 1(26)执行如下语句a=InputBox("Today","Tomorrow","Yesterday",,,"Day before yesterday",5)将显示一个输入对话框,在对话框的输入区中显示的信息是
A. Today
B. Tomorrow
C. Yesterday
D. Day before Yesterday

12.  列表框控件中的列表内容是通过( )属性设置的
A. Name
B. Caption
C. List
D. Text

13.  在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
A. 2
B. 3
C. 4
D.

14.  以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)
A.  32548.5
B. "32,548.5"
C. "032,548.50"
D. "32,548.50"

15.  在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码Private x As IntegerPrivate Sub Command1_Click()Static y As IntegerDim z As Integern=10z=n+zy=y+zx=x+zLabel1.caption=xLabel2.caption=yLabel3.caption=zEnd Sub运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是
A. 10 10 10
B. 30 30 30
C. 30 30 10
D. 10 30 30

16.  比较图片框(PictureBox)和图像框(Image)的使用,正确的描述是( )
A. 两类控件都可以设置AutoSize属性,以保证装入的图形可以自动改变大小
B. 两类控件都可以设置Stretch属性,使得图形根据物件的实际大小进行拉伸调整,保证显示图形的所有部分
C. 当图片框(PictureBox)的AutoSize自属性为Flase时,只在装入图元文件(*.wmf)时,图形才能自动调整大小以适应图片框的尺寸
D. 当图像框(Image)的Stretch属性为True时,图像框会自动改变大小以适应图形的大小,使图形充满图像框

17.  在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() For I=1 To 4 For J=0 To 1 Print Chr$(65+I); Next J Print Next I End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A. "BB CC DD EE"
B. A BB CCC DDD
C. B CC DD EEE
D. AA BBB CCCC DDDD

18.  在窗体中添加一个通用对话框,其名称为CommonDialog1,然后添加一个命令按钮。要求单击命令按钮时,打开一个打开文件的通用对话框。该窗口的标题为“打开”,在文件类型框中显示的是TextFiles(*.txt)。则能够满足上述要求的程序是( )
A. "rivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub"
B. "rivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 2CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub"
C. "rivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex =1CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd Sub"
D. "rivate Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 2CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd Sub"

19.  在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Move 500,500End Sub
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 命令按钮移动到距窗体左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500

20.  在窗体中添加一个命令按钮Command1和一个文本框Text1,编写命令按钮Command1的Click事件代码: Private Sub Command1_Click( ) Dim s As String*20 S=Text1.text …… End Sub 该程序的功能是当单击按钮Command1时,把变量s中内容写入一个顺序文件dat1.dat中,正确的程序是( )
A. "Open “dat1.dat” For Input As #1Write #1,SClose #1"
B. "Open “dat1.dat” For Output As #1 Write #1,S Close #1 "
C. "Open “dat1.dat” For Binary As #1 Write #1,SClose #1"
D. "Open “dat1.dat” For Random As #1 Write #1,S Close #1 "





欢迎光临 作业辅导网 (http://aopeng100.com/) Powered by Discuz! X3.2