求助编辑框换行问题，马上采纳

20099371

想达到如图效果，请大神指教，先谢谢了
这是代码：

1. 变量 线程ID,w,e,r,d
   
2. //从这里开始执行
   
3. 功能 执行()
   
4.     //从这里开始你的代码
   
5. 结束
   
6. //启动_热键操作
   
7. 功能 启动_热键()
   
8.     线程ID=线程开启("键盘发送字体","")
   
9. 结束
   
10. 
    
11. 功能 键盘发送字体()  
    
12.     遍历(变量 i = 0; i < 10; i++)
    
13.         w=w+1
    
14.          r=编辑框获取文本("编辑框0")
    
15.         编辑框设置文本("编辑框0",w)
    
16.         调试输出(w)
    
17.         等待(500)
    
18.         e=编辑框获取文本("编辑框0")&","
    
19.         d=r&e
    
20.         编辑框设置文本("编辑框0",d)
    
21.     结束
    
22. 结束
    
23. 功能 终止_热键()
    
24.     线程关闭(线程ID)
    
25. 结束
    

复制代码

言术

1. 变量 线程ID
   
2. 功能 执行()
   
3. 结束
   
4. 功能 启动_热键()
   
5.     线程ID=线程开启("键盘发送字体","")
   
6. 结束
   
7. 
   
8. 功能 键盘发送字体()  
   
9.     遍历(变量 i = 1; i <= 10; i++)
   
10.         编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&",\r\n"&i)
    
11.         等待(500)
    
12.     结束
    
13. 结束
    
14. 功能 终止_热键()
    
15.     线程关闭(线程ID)
    
16. 结束
    

复制代码

言术

编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&i&",\r\n")

20099371

谢谢哈

20099371

1. 变量 线程ID
   
2. //从这里开始执行
   
3. 功能 执行()
   
4.     //从这里开始你的代码
   
5. 结束
   
6. //启动_热键操作
   
7. 功能 启动_热键()
   
8.     线程ID=线程开启("键盘发送字体","")
   
9. 结束
   
10. 
    
11. 功能 键盘发送字体()  
    
12.     遍历(变量 i = 1; i <= 10; i++)
    
13.         编辑框设置文本("编辑框0",编辑框获取文本("编辑框0")&i&","&"\r\n")
    
14.         等待(500)
    
15.     结束
    
16. 结束
    
17. 功能 终止_热键()
    
18.     线程关闭(线程ID)
    
19. 结束
    

复制代码

20099371

这样效果要好些，谢谢你哈