乐筑天下

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

VBA与LISP可以整合运用吗?

[复制链接]

1

主题

5

帖子

1

银币

初来乍到

Rank: 1

铜币
9
发表于 2004-2-24 13:26:00 | 显示全部楼层 |阅读模式
VBA与LISP可以整合运用吗?
可以用VBA设计DCL界面吗?
回复

使用道具 举报

63

主题

1203

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1455
发表于 2004-2-24 13:48:00 | 显示全部楼层
這個想法不錯. 但是應會使程序更加復雜. 或都這樣做不劃算. 要學兩個語言
回复

使用道具 举报

26

主题

3072

帖子

10

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3177
发表于 2004-2-24 13:53:00 | 显示全部楼层
不可以
回复

使用道具 举报

1

主题

5

帖子

1

银币

初来乍到

Rank: 1

铜币
9
发表于 2004-2-24 23:41:00 | 显示全部楼层
同一段语言。
在不同机器上的表现!
DCL语言编的程序LABLE文字与对话框间隔是自动产生的
但有没有办法可以设间距!使对话框更美观
回复

使用道具 举报

1

主题

5

帖子

1

银币

初来乍到

Rank: 1

铜币
9
发表于 2004-2-24 23:42:00 | 显示全部楼层

h01fp4tomax.jpg

h01fp4tomax.jpg

回复

使用道具 举报

1

主题

5

帖子

1

银币

初来乍到

Rank: 1

铜币
9
发表于 2004-2-24 23:56:00 | 显示全部楼层
NSXK_1: dialog {
                                                         label = "标准男式西裤净缝制图 ";
:column{
                                 label         = "规格参数(mm)";
:edit_box {
                                                 label = "裤长(L):";
                                                 key                 = "ed1";
                                                 edit_limit         = 10;
                                                 edit_width         = 6;
                                                 value                                                 =1100;
                                                 }// end of edit_box 1
: edit_box {
                                                 label = "臀围(H):";
                                                 key                 = "ed2";
                                                 edit_limit         = 10;
                                                 edit_width         = 6;
                                                 value                                                 =1040;
                                         }// end of edit_box 2
                         
: edit_box {
                                                 label = "腰围(W):";
                                                 key                 = "ed3";
                                                 edit_limit         = 10;
                                                 edit_width         = 6;
                                                 value                                                 =740;
                                                 }// end of edit_box 3
: edit_box {
                                                 label = "上裆:";
                                                 key                 = "ed4";
                                                 edit_limit         = 10;
                                                 edit_width         = 6;
                                                 value                                                 =260;
                                                 }// end of edit_box 4
: edit_box {
                                                 label = "中裆:";
                                                 key                 = "ed5";
                                                 edit_limit         = 10;
                                                 edit_width         = 6;
                                                 value                                                 =210;
                                                 }// end of edit_box 5
       
                                                 
: edit_box {
                                                 label = "脚口:";
                                                 key                 = "ed7";
                                                 edit_limit         = 10;
                                                 
                                                 edit_width         = 6;
                                                 value                                                 =200;
                                                 }// end of edit_box 7
                                                 
initial_focus = ed1;
}// end of column       
spacer_1;
ok_cancel;
}// end of dialog
回复

使用道具 举报

18

主题

177

帖子

7

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
249
发表于 2004-2-25 08:32:00 | 显示全部楼层
在Lisp中"使对话框更美观", 困难。
这是DCL本身的缺陷。
回复

使用道具 举报

26

主题

3072

帖子

10

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3177
发表于 2004-2-25 20:23:00 | 显示全部楼层
将edit_width去掉就可以了
回复

使用道具 举报

27

主题

151

帖子

11

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2004-2-26 18:38:00 | 显示全部楼层

真的要试下
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-7-9 01:26 , Processed in 2.366884 second(s), 73 queries .

© 2020-2025 乐筑天下

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