自制一个简单的图片浏览器。要求在窗体上建立一个图像框和两个命令按钮,命令按钮上显示文字“上一张”和“下一张”。运行时,显示第一张图片,“上一张”按钮不能响应,单击“下一张”按钮显示另一张图片,“上一张”按钮能响应。显示到最后一张图片时,“下一张”按钮不能响应。(假设在在:d:pic目录下有1.jpg、2jpg、......、8.jpg这样8张图片,图片自找。)图像要自适图像框大小。
DimnAsBytePrivateSubCommand1_Click()Ifn<8ThenCommand2.Enabled=Truen=n-1CallpicIfn<=1ThenCommand1.Enabled=Falsen=1EndIfEndSubPrivateSubCommand2_Click()n=n+1Ifn>=1ThenCommand1.Enabled=TrueCallpicIfn=8ThenCommand2.Enabled=FalseEndSubPrivateSubForm_Load()n=1Command1.Enabled=FalseImage1.Picture=LoadPicture("d:pic1.jpg")EndSubSubpic()DimfnAsStringfn="d:pic"+Trim(Str(n))+".jpg"Image1.Picture=LoadPicture(fn)EndSub
举一反三
- 把一张图片替换为另一张图片并保持位置不变,需要使用的功能是() A: 选择一张图片,选择“属性”面板,单击“交换”按钮,在“交换位图”对话框中选择要替换的另一张图 B: 选择幻灯片并调出行为面板,单击“行为”面板上的“+”→“屏幕”→“转到下一张幻灯片” C: 选择幻灯片并调出行为面板,单击“行为”面板上的“+”→“屏幕”→“转到幻灯片” D: 以上说法都正确
- 在幻灯片放映状态下,在幻灯片空白处单击鼠标放映()。 A: 上一张 B: 第一张 C: 最后一张 D: 下一张
- 同一张图片,引用多次,只按一张图片的大小算。
- 在App Inventor中,要让按钮组件显示一张图片,应该把按钮的()属性设置为图像?
- ()指一张图片的透明和半透明程度,影响其与另一张图片重叠的效果
内容
- 0
_____指一张图片的半透明程度,会影响其与另一张图片重叠的效果。
- 1
photoshop通过“文件”-》”打开”操作,可以将一张图片添加到另一张图片文档内吗?
- 2
把一张图片替换为另一张图片并保持位置不变,需要使用的功能是
- 3
一张5元可以换()张2元和()张1元。一张20元可以换()张5元。
- 4
要在每一张幻灯片添加同一张图片,应该在( )中进行操作。