VB解决方案总结

发布 2022-04-02 11:39:28 阅读 6885

方案1:控件与窗体同名的限制(同一窗体中)

在同一个窗体中,如果该窗体控件名称和窗体名称一致,那么不管在本窗体或者其他窗体来调用这个窗体的show方法或其他控件都不行。

解决:同一窗体所有控件名称不要与窗体名称一致,才能使用“窗体。show”、“窗体。*.text”、“窗体。hide”等。

方案2:解决控件的动态显示或不显示。

窗体上有一个command按钮。

= false '按钮不可视。

= true '按钮可视。

可通过if语句控制器显示或不显示。

方案3:unload和hide区别。

unload me是将所在窗体本身从内存中移除,是将窗体隐藏,但是它实际上仍然在内存中。

方案4:关于where后单双引号的问题。

如果access数据库某字段的类型为数字,则vb中的where筛选中只用双引号。

例如: =select * from 采购单 where 采购编号 = 采购编号。text &

如果access数据库某字段的类型为文本,则vb中的where筛选中单双引号共用。

例如: =select * from 采购单 where 物品名称 = 物品名称。text &

方案5:程序异常退出处理。

on error goto err

你实际要执行的**。

err:if > 0 then'假如出错怎样再次捕获异常?

如果异常,则写出你要进行的处理**。

end if

方案6:区分大小写。

option explicit

option compare binary '区分大小写。

option compare text '不区分大小写。

private sub command1_click()

dim s1, s2

s1 = a"

s2 = a"

if s1 = s2 then

msgbox "相等"

elsemsgbox "不等"

end if

end sub

分别注释掉上面的一条 option compare语句试一下,可以得到不同的结果。

作用:可用于区分用户登录时用户名的大小写区分。

例子:option explicit

option compare binary '区分大小写。

option compare text '不区分大小写。

dim s1, s2

= "select * from 用户管理 where 用户名称='"

if > 0 then

s1 = 用户名称")

s2 = '区分大小写。

if s1 <>s2 then

msgbox "您可能开启了键盘大写,请区分大小写!",vbexclamation + vbokonly, "错误提醒 -

exit sub

else用户名正确,写判断密码的**。

end if

elsemsgbox "用户不存在,请重新输入正确的用户名", vbexclamation + vbokonly, "错误"

exit sub

end if

注:分别注释掉上面的一条 option compare语句试一下,可以区分或不区分大小写。

方案7:四舍五入保留两位小数。

1)、 format(3.125, "0.00") 结果是3.13

2)、 round(3.125, 2) '结果是3.12

注:round 不是四舍五入,而是“就近舍入”。返回最接近参数的整数。

如果参数为两个整数的中值(7.5),这两个整数一个为偶数(8),另一个为奇数(7),则返回偶数(8)。此方法的行为遵循“ieee 标准”754 的第 4 节。

这种舍入有时称为就近舍入或银行家舍入。

方案8:combox的使用,添加项。

1、 "客户"

2、 =产品型号"

additem是在末尾添加,list(index)是在指定位置添加的。

异常:处理异常。

if then

end if

if then

end if

bof、eof 属性:

bof 指示当前记录位置位于 recordset 对象的第一个记录之前。

eof 指示当前记录位置位于 recordset 对象的最后一个记录之后。

返回值: bof 和 eof 属性返回布尔型值。

说明: 使用 bof 和 eof 属性可确定 recordset 对象是否包含记录,或者从一个记录移动到另一个记录时是否超出 recordset 对象的限制。

如果当前记录位于第一个记录之前,bof 属性将返回 true (-1),如果当前记录为第一个记录或位于其后则将返回 false (0)。

如果当前记录位于 recordset 对象的最后一个记录之后, eof 属性将返回 true,而当前记录为 recordset 对象的最后一个记录或位于其前,则将返回 false。

如果 bof 或 eof 属性为 true,则没有当前记录。

方案9:回车键相当于按钮。

把要回车代替的按钮的default属性值设为true

private sub form_keypress(keyascii as integer)

if keyascii = 13 then

确定_click ‘回车代替确定按钮,并执行click的**。

end if

end sub

方案10:vb字符串连接符有 + 和 &

区别是 + 号的两个目都必须为字符串,例如 a+b,a、b必须都是字符中变量,否则产生一个exctption。而 & 则可直接把变更的内容用tostring方法转换,例如"astring" &1234,结果就变成astring1234

举个例子:dim a as string, b as integer,c as string

定义了三个变量。

一、字符串连接的方法:

a="abcd" &dcba"

结果是"abcddcba"

二、字符串变量的连接:

a="abcd"

c= a & dcba"

结果是"abcddcba"

a="abcd"

c="dcba"

c= c & a

结果是"dcbaabcd"

三、字符串和数字的连接:

a="abcd"

b=125c= str(b) &a

结果是c=" 125abcd"

c= a & str(b)

结果是c="abcd 125"

c= a & cstr(b)

结果是c="abcd125"

看出区别了吗。

方案11:eof或bof错误。

约束的记录集为空时会弹出此错误。

VB解决方案总结

方案 控件与窗体同名的限制 同一窗体中 在同一个窗体中,如果该窗体控件名称和窗体名称一致,那么不管在本窗体或者其他窗体来调用这个窗体的方法或其他控件都不行。解决 同一窗体所有控件名称不要与窗体名称一致,才能使用 窗体 窗体。窗体 等。方案 解决控件的动态显示或不显示。窗体上有一个按钮。按钮不可视。按...

VB解决方案总结

方案 控件与窗体同名的限制 同一窗体中 在同一个窗体中,如果该窗体控件名称和窗体名称一致,那么不管在本窗体或者其他窗体来调用这个窗体的方法或其他控件都不行。解决 同一窗体所有控件名称不要与窗体名称一致,才能使用 窗体 窗体。窗体 等。方案 解决控件的动态显示或不显示。窗体上有一个按钮。按钮不可视。按...

餐厅解决方案

一 对酒店的看法。我们酒店主要是以客房为龙头,是酒店的利润增长点,要稳定增长,而餐厅起到为客房保驾护航的作用,而现在的餐厅恰恰是我们酒店的软肋,二 目前酒店存在什么问题?该问题如何解决?答,目前酒店主要问题当然是如何做到持平并盈利,那就涉及到大的方面开源节流,在节流已经开始进行并有一定成果,当然还有...