VB到底有多少BUG?能不能设个"BUG专栏?"

flashcat451 2007-08-10 11:17:35
在一个窗体的调用中加入:
Private Sub Form_Load()
Me.BorderStyle = 1
End Sub
本来应该窗体变成不能改变大小,结果是毫无反应.了多次都不行.
但如果再加一行:
Me.Caption="%$$%%"
窗体边界马上变成不可改变. 如果把两个句子倒一下,Bordrstyle写在Caption句子后面,也无效。
为什么 ?

Timer函数中,例如:
dim s as long
long = timer
if timer<long+0.5 then
Doevents
......

我把0.5秒改成0.6以上,肯定好用,只要是小于0.5,这个句子等于白写。类似的问题我在KLP(一种小学生用的语言)中也遇到过,告别奇怪!难道是windowsXP时间本身有问题?

...全文
311 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
zq972 2007-08-13
  • 打赏
  • 举报
回复
呵呵
gxqianqin 2007-08-13
  • 打赏
  • 举报
回复
Ding
zzyong00 2007-08-11
  • 打赏
  • 举报
回复
呵呵,楼主又开一贴,只是这样的代码还反复贴出来

Timer函数中,例如:
dim s as long
long = timer
if timer<long+0.5 then
Doevents
......
cuiwei12 2007-08-11
  • 打赏
  • 举报
回复
daisy8675(莫依): “BorderStyle本身就要先设置好,就算加了caption也是无效的。”
'设计阶段form1.borderstyle为2
Private Sub Form_Load()
Me.BorderStyle = 1
Me.Caption = "123"
End Sub
程序运行,窗体不可改变大小。Caption跟BorderStyle有什么关系呢?怎么会这样?
Modest(塞北雪貂)·(偶最欣赏楼主的分):“第二个问题请楼主看看vb的四舍六入五留双。”
Private Sub Timer1_Timer()
Dim s As Long
s = Timer
While Timer < s + 0.5
Debug.Print "in"
Wend
End Sub
这个问题跟四舍五入有什么关系,摆明是楼主的代码写错了。
laviewpbt 2007-08-10
  • 打赏
  • 举报
回复
楼主真是不够负责任。
vbman2003 2007-08-10
  • 打赏
  • 举报
回复
这些是VB的BUG?
daisy8675 2007-08-10
  • 打赏
  • 举报
回复
有bug解决就好,BorderStyle本身就要先设置好,就算加了caption也是无效的。

至于trimer本身问题更多。

但是这就是现实,没有任何东西是完整的
迈克揉索芙特 2007-08-10
  • 打赏
  • 举报
回复
第二个问题请楼主看看vb的四舍六入五留双。
yachong 2007-08-10
  • 打赏
  • 举报
回复
遇到问题多想想为什么
不能因为VB没有按照你设想的方式运行,就认为是BUG
cqq_chen 2007-08-10
  • 打赏
  • 举报
回复
标题党啊!
引来N多猩猩............
yangao 2007-08-10
  • 打赏
  • 举报
回复
见识了

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧