在窗体上有一个Picture1图片框,没有加载图片,在当前文件夹下有一个位图文件pic02.bmp,并有下面的程序代码:DimHasPicAsBooleanPrivateSubPicture1_Click()IfHasPicThenPicture1.Picture=LoadPicture()ElsePicture1.Picture=LoadPicture(pic02.bmp)EndIfHasPic=NotHasPicEndSub关于这个程序运行时,下面叙述中正௲ 垎 뗐敔
举一反三
- 在窗体上有一个Picture1图片框,没有加载图片,在当前文件夹下有一个位图文件pic02.bmp,并有下面的程序代码: Dim HasPic As BooleanPrivate Sub Picture1_Click() If HasPic Then Picture1.Picture = LoadPicture("") Else Picture1.Picture = LoadPicture("pic02.bmp") End If HasPic = Not HasPicEnd Sub关于这个程序运行时,下面叙述中正确的是________。 A: 第一次单击窗体,会在图片框中显示一个图片,再单击窗体,则删除图片 B: 第一次单击图片框,会在其中显示一个图片,再单击图片框,则删除图片 C: 第一次单击图片框,会清空图片框,再单击图片框,则在其中显示一个图片 D: 第一次单击窗体,会清空图片框,再单击窗体,则在图片框中显示一个图片
- LoadPicture()函数用于在程序的代码中对图片框或图像框的 Picture 属性赋值,以便在程序的运行阶段加载图形文件
- 下列可以把工程文件所在目录下的图形文件pic1.jpg装入图片框Picture1中的语句为( )。 A: Picture1 = LoadPicture(App.Path+"\pic1.jpg") B: Picture.Handle = "pic1 .jpg" C: Picture 1.Picture = LoadPicture("pic1.jpg") D: Picture = "pic1.jpg"
- 要清除已经在图片框Picture1中打印的字符串而不清除图片框中的图像,应使用语句( )。 A: Picture 1.Cls B: Picture 1.Picture=LoadPicture(””) C: Picture 1.Print”” D: Picture 1.Picture””
- 在程序代码中清除图片框Picture1 中的图形的正确语句是______ 。 A: Picture1. picture=“” B: Picture1.picture=Loadpicture (“ ”) C: Picture1. image=“” D: Picture1. picture=Null