乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 10|回复: 5

[编程交流] 继续显示帧

[复制链接]

6

主题

19

帖子

13

银币

初来乍到

Rank: 1

铜币
30
发表于 2022-7-6 14:49:35 | 显示全部楼层 |阅读模式
你好
 
我写了一个VBA代码,当它运行的代码,我想让我的框架显示。我用的是普通的。隐藏和温的程序是唐。显示然后完成整个程序。但当我把这个放在评论中时,它并不能继续整个程序。
任何让它运行整个程序的想法。
 
再见,谢谢
 
托米
回复

使用道具 举报

0

主题

252

帖子

290

银币

限制会员

铜币
-8
发表于 2022-7-6 15:05:14 | 显示全部楼层
你需要给我们更多的合作机会
回复

使用道具 举报

6

主题

19

帖子

13

银币

初来乍到

Rank: 1

铜币
30
发表于 2022-7-6 15:22:03 | 显示全部楼层
让我们试试
 
在该程序中,它可以执行所有操作,但不执行te redraw、ucs movemen和view MOVEN。所有其他的工作。当我展示我的框架时。变焦也可以,但一切都不可行(wath is show)
 
  1. Private Sub cmdVoorbeeld_Click()
  2. 'frmcloisontest.hide
  3. EraseAll
  4. RedrawAll1
  5. RegenAll1
  6. UcsWorld
  7. SWVIEW
  8. Dim punt(0 To 2) As Double
  9. 'Zet de counter op -1.
  10. Counter = -1
  11. punt(0) = 0
  12. punt(1) = 0
  13. punt(2) = 0
  14. ......
  15. RedrawAll1
  16. RegenAll1
  17. ZoomAll
  18. 'frmcloisontest.Show
  19. End Sub
回复

使用道具 举报

6

主题

19

帖子

13

银币

初来乍到

Rank: 1

铜币
30
发表于 2022-7-6 15:32:55 | 显示全部楼层
在该程序中,它可以执行所有操作,但不执行te redraw、ucs movemen和view MOVEN。所有其他的工作。当我展示我的框架时。变焦也可以,但一切都不可行(wath is show)
 
 
 
私有子cmdVoorbeeld\u Click()
 
 
擦除重绘
RegenAll公司
UcsWorldSWVIEW
Dim punt(0到2)作为Double
'Zet de counter op-1。
计数器=-1
punt(0)=0
punt(1)=0
punt(2)=0
 
......
重画1
再生1
动物园购物中心
 
 
 
末端接头
回复

使用道具 举报

0

主题

252

帖子

290

银币

限制会员

铜币
-8
发表于 2022-7-6 15:49:35 | 显示全部楼层
重画结束时有什么/为什么是1?
回复

使用道具 举报

6

主题

19

帖子

13

银币

初来乍到

Rank: 1

铜币
30
发表于 2022-7-6 15:56:17 | 显示全部楼层
对不起,我复制粘贴了它,忘记删除1
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-4 22:17 , Processed in 0.608055 second(s), 75 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表