找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 109|回复: 1

[求助] 一直在用的输入框日志出了点问题

[复制链接]
  • 打卡等级:初涉江湖

2

主题

5

回帖

9

积分

学前班

鲜花
0
猫粮
22
发表于 2025-3-3 13:36:53 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
[按键精灵] 纯文本查看 复制代码
//调试按键 
Event 脚本调试.按钮.Click
    日志输出 "A"
    脚本调试.SaveSetting 
    脚本调试.LoadSetting
End Event

Event 脚本调试.LoadOver
    脚本调试.运行日志.Text = ""
End Event

'日志API
Declare Function 发送消息_ Lib "user32" Alias "SendMessageA"(ByVal 窗口句柄 As Long,ByVal 信息值 As Long,ByVal 参数一 As Any,ByVal 参数二 As Long) As Long

Function 日志输出(内容)
    脚本调试.运行日志.Text = 脚本调试.运行日志.Text & 内容 & Vbcrlf
    发送消息_ 脚本调试.运行日志.Hwnd, 182, 0, 65535
End Function

点击按钮后,在配置文件里
脚本调试.运行日志.Text= A 口
点击按钮两次后是 AA口口
然后无论对脚本调试.运行日志.Text有什么操作,里面的口口口都不会消失,在不删除配置文件的情况下怎样去掉这些口
楼主热帖
  • 打卡等级:初涉江湖

2

主题

5

回帖

9

积分

学前班

鲜花
0
猫粮
22
 楼主| 发表于 2025-3-3 14:12:28 | 显示全部楼层
save+load导致本该在换行符后字符写在了换行符前,save前加入
[按键精灵] 纯文本查看 复制代码
    If Right(脚本调试.运行日志.Text, 2) = vbcrlf Then 
        脚本调试.运行日志.Text = left(脚本调试.运行日志.Text,Len(脚本调试.运行日志.Text)-2)
    End If

消除字符串末尾的换行符防止错行
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|紫猫编程学园

GMT+8, 2025-3-26 08:41

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表