你可能感兴趣的试题
选择图片框,然后按<Del>键 执行语句Picture1.Picture=LoadPicture("") 执行语句Picture1.Picture="" 选择图片框,在属性窗口中选择Picture属性,然后按删除该属性的值
Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) Print X Y End Sub Private Sub P1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Picture.Print X,Y End Sub Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) P1.Print X,Y End Sub Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) P1.Print X,Y End Sub
程序中没有设置5秒钟的时间,所以不能每隔5秒移动图片框一次 此程序运行时图片框位置保持不动 此程序运行时图片框移动方向与题目要求相反 If语句条件中“Picture1.Left
选择图片框,然后按Del键 执行语句Picture1.Picture = LoadPicture ("") 执行语句Picture1.Picture ="" 选择图片框,在属性窗口中选择Picture属性条,然后按回车键
选择图片框,然后按Del键 执行语句Picture1.Picture=LoadPicture("") 执行语句Picturel.Picture="" 选择图片框,在属性窗口中选择Picture属性条,然后按回车键
Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print X,Y
End Sub Private Sub P1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Picture.Print X,Y
End Sub Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
P1.Print X,Y
End Sub Private Sub Form_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single)
P1.Print X,Y
End Sub
当鼠标移动到这些图片上时,如果给图像加上了说明文本,浏器可以在鼠标旁弹出一个黄底的说明框 当浏器禁止显示图片时,如果给图像加上了替换文本,可以在图片的位置显示出这些文本 使该图像下载速度变快 使该图象优先下载
Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) P1.Print X,Y End Sub Private Sub P1_MouseMove(Button As Integer,Sluft As Integer,X As Single,Y As Single) P1.PrintX,Y End Sub Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) Print X,Y End Sub Private Sub P1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Picture,Print X.Y End Sub
选择图片框,然后按Del键 执行语句Picture1.Picture = LoadPicture ("") 执行语句Picture1.Picture ="" 选择图片框,在属性窗口中选择Picture属性条,然后按回车键
Private Sub Picture1_MouseMove(Button As Integer,Shift As integer,XAs Single,Y As Single) Picture1.Print X,Y EndSub Private Sub Picture1_MouseMove(Button As Integer,Shift As Integer,XAs Single,Y As Single) Print X,Y EndSub Private Sub Picture1_MouseDown(Button As Integer,Shift As Integer,XAs Single,Y As Single) Picture.Print X,Y End Sub Private Sub Form_MouseMove(Button As Integer Shift As Integer,XAs Single,Y As Single) Picture1.Print X,Y End Sub
Picture1.Cls Picture1.Picture=LoadPicture("") Picture1.Pint"" Picture1.Picture""
当鼠标移动到这些图片上时,如果给图像加上了说明文本,浏览器可以在鼠标旁弹出一个黄底的说明框 当浏览器禁止显示图片时,如果给图像加上了说明文本,可以在图片的位置显示出这些文本 使图像下载速度变快 使该图像优先下载
单击图片框,然后按Del键 执行语句Picture1.Picture=LoadPicture("") 执行语句Picture1.Picture="" 执行语句:Picture1.Cls
Picture1. Picture="mypijpg" Picture1.Image="mypijpg" Picture1.Picture=LoadPicture("mypijpg") LoadPicture("mypijpg")
程序运行时会出错 单击图片框,在图片框中显示一幅图片 过程中的x是控件变量 单击标签,在标签中显示一串文字
选择图片框,然后按Del键 执行语句Picture1.Picture=LoadPicture(“”) 执行语句Picture1.Picture=“” 选择图片框,在属性窗口中选择Picture属性条,然后按回车键
Private Sub P1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print X,Y
End Sub Private Sub P1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture.Print X,Y
End Sub Private Sub P1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
P1.Print X,Y
End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
P1.Print X,Y
End Sub
选择图片框控件,然后按<Del>键 执行语句Picture1. Picture=LoadPicture("") 执行语句。Picture1. Picture="" 选择图片框控件,在属性窗口中选择Picture属性,然后删除该属性的值
Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single) Print X,Y End Sub Private Sub P1_MouseDown(Button AS Integer,Shift As Integer,X As Single, Y As Single) Picture.Print X,Y End Sub Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single) P1.Print X,Y End Sub Private Sub Form_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single) P1.Print X,Y End Sub