vb
lllllLiangjia
这个作者很懒,什么都没留下…
展开
-
学生信息系统优化(一)---文本框系列
一个软件在能够完成基本的功能的基础上,要让客户有更好的用户体验。优化是重中之重。在第一次验项目时,师傅给我指出了很多问题。尤其是文本框的问题最大,而且任务量还繁多。所以我就从它先下手。虽然比较麻烦,但是很多不同窗体里的文本框text都是一样的问题。本质不变,只需要改下名字就好。下面是几类问题问题一:限制文本框输入字符个数解决办法1、直接在text文本框属性中定义MaxLength的值,...原创 2018-07-30 20:00:01 · 355 阅读 · 14 评论 -
机房收费系统----关闭vb窗口事件并进行提示
如果需要在窗口关闭事件中进行操作,那么肯定就会用到queryunload事件,query的中文是“询问”的意思,顾名思义,它就是询问是否真的需要关闭,所以queryunload事件要在unload事件之前。queryunload用法格式:Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) ...原创 2018-09-12 11:53:10 · 393 阅读 · 8 评论 -
机房收费系统改进之处---总结
vb最后一个大项目终于敲完了,感觉很好,舒服!这篇博客总结我不写任何代码,只写一些我觉得原系统的应该不足以及我自己的更改之处。软件问题菜单编辑器 窗口 修改 一般用户 一般用户上线时,菜单编辑器只能显示一般...原创 2018-09-15 18:37:43 · 270 阅读 · 20 评论 -
机房收费系统---SSTab选项卡分别运行
背景当进行到结账窗体时,每当运行到SSTab控件,里面各个选项卡都会一起运行完,于是我就想如何设置点击单个的选项卡时只运行该选项卡里的内容。代码实现Private Sub SSTab1_Click(PreviousTab As Integer) Select Case SSTab1.Tab Case 0 msgbox“这是第一个选项卡”,vbokonl...原创 2018-09-05 08:57:41 · 304 阅读 · 10 评论 -
VB跳过错误(error)----编码小技巧
背景敲机房时,在用到导出execl表格,当点击否按钮时,就出现了错误,显示实时错误‘1004’:对象‘saveas’的方法‘_workbook’失败。 我遇到这个错误之后,我想我点击的是“否”按钮,正确操作的话是直接退出就行。那这样的话如果我直接跳过这个错误,不是跟正确操作实现是一样的。所...原创 2018-08-28 17:11:22 · 4243 阅读 · 17 评论 -
VB中Msgbox提示框代码“vbOKOnly”与“vbOKCancel”的区别
背景在做机房系统退卡窗体时,出于要有良好的用户体验时,我觉得在选好卡号之后,点击确定,要提示一下用户,确定是否删除本卡,防止用户时候着急操作失误。遇到的问题当我最开始时编辑的代码是这样的If MsgBox("是否真的要退卡?", vbOKonly, "退卡提示") = vbok Then MsgBox"退卡成功!", vbOKOnly, "提示"end if但是...原创 2018-08-27 17:52:55 · 11968 阅读 · 14 评论 -
vb中”and“与“&”的区别
今天敲机房收费系统充值窗口时,需要在text文本中,既显示自己输入的字,又要显示从数据库中提取的数据,那么就涉及到一个问题,中间的连接字符用什么。刚开始我用AND进行连接。Text3.Text = "充值卡号:" And mrcc.Fields(0)结果显示错误’13‘;类型不匹配。之后我在网上知道了正确的是用&进行连接Text3.Text = "充值卡号:" &a...原创 2018-08-27 15:33:43 · 12901 阅读 · 12 评论 -
char与varchar的区别
char与varchar都是非Unicode字符数据Unicode是什么?它是为了各种语言而设定的统一的编码方式。通常用两个字节表示一个字符,原有的英文编码从单字节变成双字节。二者不论是存储英文还是中文都是占用两个字节char是定长的,当你输入的字符小于你指定的数目时,电脑会自动补齐后面为空值。而varnhar是可变n度的。nchar、nvarchar。这两种从名字上看比前面三...原创 2018-08-08 17:50:16 · 434 阅读 · 14 评论 -
vb中MSHFlexgrid控件小总结
MSHFlexgrid控件的属性有很多,现在我就简单写一些关于现在咱们正需要用到的属性,希望这些解释可以加深大家的理解。row :指表格的行 rows: 表格的总行数rowsel:选中行数,可以为一个范围多行col 指表格的列 cols 表格的总列数clowidth:列宽mouserow:鼠标所在行Tyxtmatrix(x,y):返...原创 2018-08-12 20:49:16 · 3551 阅读 · 13 评论 -
学生信息系统优化(三)---查询信息按钮
背景第一次验项目漏洞百出,有一个问题给我留下了深刻的印象,如下图是我的查询信息窗体问题我的代码运行起来之后,数据库里的信息设成了一个循环,当记录到达最后一条时,点击下一条就会返回到第一条记录,同理,记录到第一条时,点击上一条记录会回到最后一条记录。师傅这时候问我,如果软件是这样的,那么要第一条记录和最后一条记录还有什么用。我觉得师父说的有道理。所以回来之后我就开始更改我的代码。并且将“...原创 2018-08-02 16:23:03 · 477 阅读 · 6 评论 -
学生信息系统优化(二)---实时错误"3021"
背景当我让师傅给我初次验项目时,师傅就“兴致勃勃”的给我展示了这个错误。当将信息全部删除时,3021就蹦了出来。我一脸懵逼,师傅们说这是他们也遇到过的错误。果然在通往成功的路上,没有捷径,遇到的困难都是一样的解析出现实时错误3021时,后面都会有提示——BOF或EOF中有一个是“真“,或者当前的记录已被删除,所需的操作要求一个当前的记录。出现的原因是因为数据库中数据为空。BOF 是...原创 2018-07-31 12:43:29 · 919 阅读 · 11 评论 -
机房收费系统----用户登陆软件关闭软件信息在worklog表中的添加
当机房快要接近尾声的时候,我发现有一个很重要的程序没有做,那就是使用软件的用户登陆和关闭软件的信息获取,也就是在worklog_info表中加信息。编写过程1.我们这个时候需要用到标签(标签的使用和作用我之前的博客有提到,不明白的可以看我之前的博客),之前咱们学生管理系统里学到的东西现在就要使用了,锻炼我们举一反三的能力,先在模块里声明全局变量myBookmark,由于myBook不...原创 2018-09-13 16:07:17 · 250 阅读 · 12 评论