更多"确定图片框Picturel在窗体上位置的属性是( )。"的相关试题:
[单项选择]窗体上有一个名称为Picturel的图片框控件，一个名称为Label1的标签控件，如下图所示。 现有如下程序： Public Sub display (x As Control) If TypeOf x Is Label Then x.Caption="计算机等级考试" Else x.Picture=LoadPicture("pic.jpg") End If End Sub Private Sub Labell_Click（ ） Call display(Labell) End Sub Private Sub Picture1_Click（ ） Call display(Picture1) End Sub 对以上程序，下列叙述中错误的是( )。
A. 程序运行时会出错
B. 单击图片框，在图片框中显示一幅图片
C. 过程中的x是控件变量
D. 单击标签，在标签中显示一串文字
[单项选择]确定一个控件在窗体上的位置的属性是( )。
A. Width和Height
B. Width或Height
C. Top和Left
D. Top或Left
[单项选择]假定在网片框Picturel中装入了一个图形，为了清除该图形(不删除图片框)，应采用的正确方法是______。
A. 选择图片框，然后按Delete键
B. 执行语句Picturel. Picture=LoadPicture("")
C. 执行语句Picturel. Picture="
D. 选择图片框，在属性窗口中选择Picture属性条，然后按Enter键
[填空题]将C盘根目录下的图形文件moon.jpg装入图片框Picturel的语句是______。
[单项选择]应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，单击窗体和命令按钮的事件过程名分别为______。
A. form_ Click() Command1_Click()
B. Frm1_ Click() Command1_ Click()
C. form_ Click() Cmd1_ Click()
D. Frm1_ Click() Cmd1_ Click()
[单项选择]假定在图片框控件Picturel中装入了一个图形，为了在程序运行时清除该图形，则应使用下列哪种方法( )。
A. 选择图片框控件，然后按＜Del＞键
B. 执行语句Picture1.Picture=LoadPictum("")
C. 执行语句Picture1.Picture=""
D. 选择图片框控件，在属性窗口中选择Picture属性，然后删除该属性的值
[单项选择]假定窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是
A. 单击窗体上没有控件的地方
B. 单击任一个控件
C. 不执行任何操作
D. 双击窗体的标题栏
[单项选择]在窗体上，设置控件Command0为不可见的属性是
A. Command0.Colore
B. Command0.Caption
C. Command0.Enabled
D. Command0.Visible
[单项选择]设窗体上有一个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是______。
A. 程序运行时，若使滚动块向右移动，滚动条的Value属性值就增加
B. 程序运行时，若使滚动块向右移动，滚动条的Value属性值就减少
C. 由于滚动条的Max属性值小于Min属性值，程序会出错
D. 由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动
[单项选择]设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是( )
A. 程序运行时，若使滚动块向左移动，滚动条的Value属性值就增加
B. 程序运行时，若使滚动块向左移动，滚动条的Value属性值就减少
C. 由于滚动条的Max属性值小于Min属性值，程序会出错
D. 由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动
[单项选择]要改变窗体上文本框控件的数据源，应设置的属性是
A. 记录源
B. 控件来源
C. 筛选查询
D. 默认值
[单项选择]要改变窗体上文本框控件的输出内容，应设置的属性是
A. 标题
B. 查询条件
C. 控件来源
D. 记录源
[单项选择]在窗体上画一个通用对话框，其Name属性为Cont，再画一个命令按钮，Name属性为Command1，然后编写如下事件过程：
Private Sub Command1 Click（ ）
Cont.FileName=" "
Cont.Flags=vbOFNFileMustExist
Cont.Filter="All Filesl|*．*"
Cont.FilterIndex=3
Cont.DialogTitle="Open File"
Cont.Action=1
If Cont.FileName=" " Then
MsgBox "No file selected"
Else
Open Cont.FileName For Input As # 1
Do While Not EOF(1)
Input # 1,b$
Print b$
Loop
End If
End Sub
以下各选项，对上述事件过程描述错误的是( )
A. 该事件过程用来建立一个Open对话框，可以在这个对话框中选择要打开的文件
B. 选择后单击“打开”按钮，所选择的文件名即作为对话框的FileName属性值
C. Open对话框不仅用来选择一个文件，还可以打开、显示文件
D. 过程中的“Cont.Action=1”用来建立Open对话框，它与Cont.ShowOpen等价
[单项选择]在窗体上，设置控件Command1为不可见的属性是( )。
A. Command1.Name
B. Command1.Caption
C. Command1.Enabled
D. Command1.Visible
[填空题]
在窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：
Private Sub Form_Click（ ）
Open "d:/test/smtext1.Txt" For Input As #1
Do While Not （）
Line Input #1, aspect$
Whole$=whole$+aspect$+Chr$(13)+Chr$(10)
Loop
Text1.Text=whole$
（）
Open "d:/test/smtext2.Txt" For Output As #1
Print #1, （）
Close #1
End Sub
运行程序，单击窗体，将把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。
