VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 10139|回复: 28

[原创] VB表格控件案例

[复制链接]
发表于 2015-8-14 12:33:59 | 显示全部楼层 |阅读模式
VB表格控件(celltext.ocx),可编辑、复制、粘贴,鼠标拖动下拉复制/+n复制,公式计算/字符串处理(自动更新),
排序排名/统计描述,数据导入/导出,表格数据打印预览/打印等;支持鼠标中键滚轮,操作与Excel表格类似。


本帖子中包含更多资源

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

x
发表于 2015-8-14 22:38:46 | 显示全部楼层
用方向键移动单元格后,无法立即输入(输入无显示),只能按下回车键后才能输入。我没设置好?
回复 支持 反对

使用道具 举报

发表于 2015-8-15 09:31:32 | 显示全部楼层
下载了看看
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-8-15 12:46:06 | 显示全部楼层
hnzlf 发表于 2015-8-14 22:38
用方向键移动单元格后,无法立即输入(输入无显示),只能按下回车键后才能输入。我没设置好?

对的,一般是鼠标左键点击输入,或按回车键输入。
回复 支持 反对

使用道具 举报

发表于 2015-8-18 17:33:06 | 显示全部楼层
本帖最后由 Jen 于 2015-8-18 18:00 编辑

粗略的写一些:
1. 表格的函数名小写,不规范。什么cc0的鬼才知道什么意思。不知道你是怎样想的.
2.一个表格有3个依赖。2个ocx一个dll。为什么不合起来呢?
3. 随便敲了几个字,按demo中的Print按钮,没有什么反应。应该弹出我的缺省PDFCreator打印界面呀。供人测试的demo,至少把你宣传的功能一个一个的演示一下,不应该只有一行吧?
4. 打字移动下一格,前一表格的字在新格里闪了一下。。。体验太差了。。。应该将Textbox位置放置好吧
5. 鼠标移动滚动条,停止才更新界面,你见过有什么商业表格软件时这样的吗?
6. 事件就那么几个?
7.在VBIDE下跑了一下,10多秒才出现界面,为什么那么慢?还弹什么注册窗口。恶心得都不想测试了。。。

其实,你应该把什么复杂的功能拿掉譬如公式计算,先把基础做好,Too Complex To Manage。。。练练手可以,商业控件不是随便做的。Good Luck!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-8-19 12:31:09 | 显示全部楼层
有你说的那么衰吗?
我这边用起来怎么很好呢!!!
另外再给你一个使用该控件项目的下载地址:
http://pan.baidu.com/s/1o6JzlME
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-8-19 12:37:57 | 显示全部楼层
楼上测试的挺细心的
但结论不敢苟同
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-8-19 12:39:37 | 显示全部楼层
感兴趣的都去测试测试,看看和五楼说的一样不!!!
回复 支持 反对

使用道具 举报

发表于 2015-8-19 15:40:55 | 显示全部楼层
本帖最后由 Jen 于 2015-8-20 09:52 编辑
wqq799 发表于 2015-8-19 12:37
楼上测试的挺细心的
但结论不敢苟同


1. 表格的函数名小写,不规范。什么cc0的鬼才知道什么意思。不知道你是怎样想的.
.pmenu
.cc
.cc0


2.一个表格有3个依赖。2个ocx一个dll。为什么不合起来呢?
celltext.ocx
mscroll.ocx
GridPrint.dll

3. 随便敲了几个字,按demo中的Print按钮,没有什么反应。应该弹出我的缺省PDFCreator打印界面呀。供人测试的demo,至少把你宣传的功能一个一个的演示一下,不应该只有一行吧?

打印没有反应,关闭demo后崩溃。

demo只有一行:
Private Sub Command1_Click()
Call celltext1.gridprint
End Sub


4. 打字移动下一格,前一表格的字在新格里闪了一下。。。体验太差了。。。应该将Textbox位置放置好吧


5. 鼠标移动滚动条,停止才更新界面,你见过有什么商业表格软件时这样的吗?
鼠标移动滚动条,停止后才更新界面,事实就是这样。
鼠标滚动,多选消失了。

6. 事件就那么几个?
有几个还是控件本身的事件,你所说的丰富功能呢?
  1. Private Sub celltext1_DragDrop(Source As Control, x As Single, y As Single)

  2. End Sub

  3. Private Sub celltext1_DragOver(Source As Control, x As Single, y As Single, State As Integer)

  4. End Sub

  5. Private Sub celltext1_GotFocus()

  6. End Sub

  7. Private Sub celltext1_LostFocus()

  8. End Sub

  9. Private Sub celltext1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)

  10. End Sub

  11. Private Sub celltext1_Validate(Cancel As Boolean)

  12. End Sub
复制代码
7.在VBIDE下跑了一下,10多秒才出现界面,为什么那么慢?还弹什么注册窗口。恶心得都不想测试了。。。
精确计算是11秒
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-8-20 12:21:11 | 显示全部楼层
Jen 发表于 2015-8-19 15:40
1. 表格的函数名小写,不规范。什么cc0的鬼才知道什么意思。不知道你是怎样想的.
.pmenu
.cc

第一条好像不区分大小写!
第二条控件有详细的使用说明,至于名字管它叫阿猫还是阿狗呢,反正都一样!
......
......
不过很多人确实喜欢单文件版的控件!!!
现在就附上单文件版的控件:


本帖子中包含更多资源

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

x
回复 支持 反对

使用道具 举报

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

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-7-3 17:32

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表