社区
VB基础类 帖子详情 cls的用法 wcj0080180 2010-03-07 04:50:48 请举例子
...全文
349 10 打赏 收藏 cls的用法 请举例子 复制链接
扫一扫 分享 转发到动态 举报 AI 作业
写回复 配置赞助广告取 消
确 定
用AI写文章 10 条回复 切换为时间正序 请发表友善的回复… 发表回复 打赏红包 需支付: 0.00 元 取 消 确 定 lsftest 2010-03-08 打赏举报 回复 引用 8 楼 wcj0080180 的回复:#6楼,我在CLS前加了一句Form1.Picture = LoadPicture("........")加入图形,无法清除.
cls方法是用来清除form1.line之类的方法画出来的东西。
loadpicture方法加入的图形是底图，用：
Form1.Picture = LoadPicture("")清除
threenewbee 2010-03-08 打赏举报 回复 参考6楼。
多查阅MSDN是正解。 wcj0080180 2010-03-07 打赏举报 回复 #6楼,我在CLS前加了一句Form1.Picture = LoadPicture("........")加入图形,无法清除. gukuang78 2010-03-07 打赏举报 回复 up................... chinaboyzyq 2010-03-07 打赏举报 回复 Cls 方法
清除运行时 Form 或 PictureBox 所生成的图形和文本。
语法
object.Cls
object 所在处代表一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，则带有焦点的 Form 就被认为是 object。
说明
Cls 将清除图形和打印语句在运行时所产生的文本和图形，而设计时在 Form 中使用 Picture 属性设置的背景位图和放置的控件不受 Cls 影响。如果激活 Cls 之前 AutoRedraw 属性设置为 False， 调用时该属性设置为 True，则放置在 Form 或 PictureBox 中的图形和文本也不受影响。 这就是说，通过对正在处理的对象的 AutoRedraw 属性进行操作，可以保持 Form 或 PictureBox 中的图形和文本。
调用 Cls 之后，object 的 CurrentX 和 CurrentY 属性复位为 0。
Cls 方法示例
本示例使用 Cls 方法从一个窗体中删除打印信息。要检验此示例，可将本例代码粘贴到一个窗体的声明部分，然后按 F5 并单击该窗体。
Private Sub Form_Click ()
Dim Msg ' 声明变量。
AutoRedraw = -1 ' 打开 AutoRedraw。
ForeColor = QBColor(15) ' 将前景设置为白色。
BackColor = QBColor(1) ' 将背景设置为蓝色。
FillStyle = 7 ' 设置对角线菱形。
Line (0, 0)-(ScaleWidth, ScaleHeight), , B ' 将框放在窗体上。
Msg = "This is information printed on the form background."
CurrentX = ScaleWidth / 2 - TextWidth(Msg) / 2 ' 设置 X 的位置。
CurrentY = 2 * TextHeight(Msg) ' 设置 Y 的位置。
Print Msg ' 打印信息至窗体。
Msg = "Choose OK to clear the information and background "
Msg = Msg & "pattern just displayed on the form."
MsgBox Msg ' 显示信息。
Cls ' 清除窗体的背景。
End Sub
zdingyun 2010-03-07 打赏举报 回复 引用 2 楼 zdingyun 的回复:Me.Cls '清除在窗体的画图
PicTure1.Cls '清除在图片框的画图
抱歉!Cls 方法
清除运行时 Form 或 PictureBox 所生成的图形和文本。
清任何图片框装载的图像
Picture1.Picture = LoadPicture() '清除 picturebox。
wcj0080180 2010-03-07 打赏举报 回复 试了,cls只能清窗体用print显示的文字,不能清任何图像,用picture1.cls也没用 wcj0080180 2010-03-07 打赏举报 回复 不行的,提示对象不支持该属性或方法 zdingyun 2010-03-07 打赏举报 回复 Me.Cls '清除在窗体的画图
PicTure1.Cls '清除在图片框的画图
wcj0080180 2010-03-07 打赏举报 回复 cls的使用方法,举例 typeorm-transactional-cls-hooked:用于typeorm的事务方法装饰器，使用cls-hooked处理和传播不同存储库和服务方法之间的事务。 由Spring Trasnactional注释和CLS序列化表示 Transactional方法装饰器，使用处理和传播不同存储库和服务方法之间的事务。 受到注释和启发 见 安装 npm install --save typeorm-transactional-cls-hooked # # Needed dependencies npm install --save typeorm ... cls-porqpine:使用 continuation-local-storage 模块让 porqpine 玩得很好 用法 var cls = require ( 'continuation-local-storage' ) ;var porqpine = require ( 'porqpine' ) ;var porqpatch = require ( 'cls-porqpine' ) ;// patch mongodb to cure its amnesiaporqpatch ( cls . ... DEScls:用于公共DESY1数据集的带有星系聚类和弱透镜的Cls的存储库 用法为了运行代码，请使用python3 run_cls.py input/kv450_1024.yml cls 。 您可以使用python3 run_cls.py -h查看不同的选项。 您可以使用python3 -m直接运行xcell/cls/cl.py ， cov.py ， to_sacc.py作为python3 -m... jQuery EasyUI 1.5.1 离线简体中文API文档 含完整开发工具包+皮肤+扩展+演示 textbox：可以用“cls”属性添加自定义样式； numberbox：允许用户使用意大利货币格式； combo：添加“multivalue”属性，允许用户决定如何提交多个值； combobox：添加“reversed”属性； combobox：添加... Python3.4学习笔记之 idle 清屏扩展插件用法分析 这种方法只能在windows系统中cmd模式下的python shell 才管用（因为cls的命令是针对cmd的），在python idle直接返回了一个0的值。 2.定义一个cls的函数，每次使用输入cls()即可 def cls(): print \
VB基础类
7,785
社区成员
197,585
社区内容
发帖 与我相关 我的任务 VB基础类 VB 基础类 复制链接
扫一扫 分享 确定 社区描述 VB 基础类 社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告 试试用AI创作助手写篇文章吧
+ 用AI写文章