展开全部
以上是所使用的图片
以下是源码,方法都差不多吧,灵活应用一下,我用的是画板!
.版本 2
.子程序 __启动窗口_创建完毕
画板1.移动 (, , 72, 46)
画板1.底图 = #a
画板2.可视 = 假
画板2.自动重画 = 真
画板2.移动 (, , 24, 23)
图片框1.移动 (, , 24, 23)
编辑框1.输入方式 = 3
.子程序 _按钮1_被单击
图片框1.图片 = 取图片 (到整数 (编辑框1.内容), 3, 24, 23)
.子程序 取图片, 字节集
.参数 第几张, 整数型, , 从
.参数 行张数, 整数型
.参数 单张宽, 整数型
.参数 单张高, 整数型
.局部变量 a
.局部变量 b
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 w, 整数型
.局部变量 h, 整数型
a = 第几张 % 行张数
b = 第几张 ÷ 行张数
x = a × 单张宽
w = a × 单张宽 + 单张宽
y = b × 单张高
h = b × 单张高 + 单张高
画板1.复制 (x, y, w, h, 画板2, 0, 0, 1)
返回 (画板2.取图片 (, ))
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询