设窗体上有一个图片框Picturel,要在程序运行期间装入当前文件夹下的图形文件File1.jpg,能实现此
![](https://lstatic.shangxueba.com/sxbcn/h5/images/tips_org.png)
第1题
窗体上有一个名称为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.单击标签,在标签中显示一串文字
第2题
A ) Picture1.Picture= ” Flie1.jpg
B ) Picture1.Picture=LoadPicture(“ File1.jpg ” )
C) LoadPicture(“ File1.jpg ” )
D ) Call LoadPicture(“ File1.jpg ” )
第3题
窗体上已有1个名称为Picturel的图片框,要求实现下面2个功能之一:
①在窗体上移动鼠标时,立即将Picturel显示在鼠标位置
②在窗体上单击鼠标时,立即将Picturel显示在鼠标位置
下面不能实现上述任何功能的事件过程是
第4题
窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。
请填空。
Private Sub Form_Load()
Picturel.Picture=LoadPicture("c:\My Documents\图片\Qianl_Icon02.ico")
______
End Sub
Private Sub Timer1_Timer()
Static x,y As Integer
x=x+300
y=y+300
Picturel.Move x,y
End Sub
第5题
要求:去掉程序中的注释符,把程序中的?改为正确的内容。最后把修改后的文件按原文件名存盘。
第6题
窗体中有图片框(Picturel)和计时器(Timed)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向下、向右移动100twip。请填空。
Private Sub Form_Load()
Prcture1_Picture=LoadPicture("c\pic\mouth.ico")
______.Interva=2000
End Sub
Prinvate Sub Timer1_Timer()
Static x,y As Integer
x=x+100
y=y+100
Pictuer1.Move[x,y]
End Sub
第7题
【题目描述】
第 42 题在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
程序运行后,在文本框中显示的内容是(),而在图片框中显示的内容是() 。
【我提交的答案】:
【参考答案分析】:VisualBasic,级等级考试
【解析】程序运行使文本框内出现“Visual Basic”,这又触发Textl_Change()事件,这个事件的处理程序调用Picturel的Print方法,将字符串输出到图片框,从而在图片框内输出字符串“二级等级考试”。
【我的疑问】(如下,请求专家帮助解答)
第8题
第9题
(18)窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是。 Privte Sub Command1_Click() Picture1.Picture=LoadPicture("c:\picture.jpg") Picture1.Cls Picture1.Print"Picture" End SubA.窗体无显示,图片框显示图片和文字Picture B.窗体上出现Picture文本,图片框无显示C.窗体上出现Picture文本,图片框显示图片picture.jpg D.窗体无显示,图片框只显示Picture文字
第10题
窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是()。 Private Sub Commandl_Click() Picturel.Picture=LoadPicture("c:\picture.jpg") Picmrel.Cls Picturel.Print "picture" End Sub
A.窗体无显示,图片框显示图片和文字picture
B.窗体上出现picture文本,图片框无显示
C.窗体上出现picture文本,图片框显示图片picture.jpg
D.窗体无显示,图片框只显示picture文字
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!