谢谢大家的帮助,又有2个新问题:)

jourmen IBM 架构师  2003-09-18 02:41:02
1.我读日志用的是一个死循环来读的(消息的数量居多),我希望在程序读的过程中,我点击暂停,他可以停下来,现在运行时,它什么也不响应的,怎样在循环里判断外部的事件响应呢;)

2.Dim Buffermsg As String * 1024 这个是什么意思:)
...全文
8 点赞 收藏 17
写回复
17 条回复
切换为时间正序
请发表友善的回复…
发表回复
kuangjingbo 2003-09-21
1.多线程
回复
佛的光辉 2003-09-20
1、在循环中加入DoEvents语句
2、定义一个长度为1024个字符的字符串
回复
BrightFire 2003-09-20
论坛里有一篇关于VB实现多线程的文章,可能对你有些帮助
http://www.csdn.net/develop/Read_Article.asp?Id=18660
回复
Depress 2003-09-20
Dim Buffermsg As String * 1024
是定义定长的字符串。
回复
flc 2003-09-20
帮你UP
回复
James0001 2003-09-20
Reply(of123).Number2

2.Dim Buffermsg As String * 1024 这个是什么意思
--------------------------------------------------
定长字符串,长度1024字节

--------------------------------------------------
错了,净长度 2048 字节(Unicode)。 :)
回复
jourmen 2003-09-19
问题1在pb中有yield()这个函数,我同学找到了
在vb里类似的吗?
我这没有msdn的,查不到,

回复
jourmen 2003-09-19
帮帮我呀:)
我的程序就差这个判断了:(((
回复
jourmen 2003-09-19
谢谢大家,doevents可以实现这个功能了
但是我的程序要做成这样
do
。。。
if 有cmdlick then
doevents,
’退出,不读日志了
else
sleep ‘sleep 5s后继续循环读日志的
end if

这个if怎么写呢?

回复
of123 2003-09-19
1.我读日志用的是一个死循环来读的(消息的数量居多),我希望在程序读的过程中,我点击暂停,他可以停下来,现在运行时,它什么也不响应的,怎样在循环里判断外部的事件响应呢;)

doevents()

2.Dim Buffermsg As String * 1024 这个是什么意思:

定长字符串,长度1024字节

3.在menu下,我有一个是点击练到公司的网站上的,那个代码怎么写呢?3

ShellExecute Me.hwnd, "", "http://www.263.net", "", "", 1
回复
liul17 2003-09-19
dim bClick as boolean

bclick = true;
do while(true and bClick)
debug.print "a"
doevents
loop

private sub command1_click()
bclick = false


end sub
回复
busisoft 2003-09-19
可以定义一个全局变量来实现你所说的功能。
vb只能用于单元线程模型,所以vb中没有yield()这样的函数,vc中有。
回复
liul17 2003-09-19
在循环中加个 doevents 试试
回复
wingchi 2003-09-19
exit for
回复
wingchi 2003-09-18
3

Private Sub Command1_Click()
MyValue = Shell("rundll32.exe url.dll,FileProtocolHandler " & "http://www.163.com", 1)
End Sub
回复
wingchi 2003-09-18
1,不会


2,String 数据类型
如果变量总是包含字符串而从不包含数值,就可将其声明为 String 类型。

Private S As String

然后可将字符串赋予这个变量,并用字符串函数对它进行操作。

S = "Database"
S = Left (S,4)

按照缺省规定,String 变量或参数是一个可变长度的字符串,随着对字符串赋予新数据,它的长度可增可减。 也可以声明字符串具有固定长度。可用以下语法声明一个定长字符串:

String * size

例如,为了声明一个长度为 50 字符的字符串,可用下列语句:

Dim EmpName As String * 50

如果赋予字符串的字符少于 50 个,则用空格将 EmpName 的不足部分填满。如果赋予字符串的长度太长,已不能成为定长字符串,则 Visual Basic 会直接截去超出部分的字符。

因为定长字符串用空格填充尾部多余的空间,所以在处理定长字符串时可发现,删除空格的 Trim 和 RTrim 函数是很有用的。

可将标准模块中的定长字符串声明为 Public 或 Private。在窗体和类模块中,必须将定长字符串声明为 Private。

详细信息 请参阅语言参考中的“Ltrim、RTrim Function 和 Trim 函数”。

回复
jourmen 2003-09-18
3问:
在menu下,我有一个是点击练到公司的网站上的,那个代码怎么写呢?

不好意思,对vb实在是不懂:)
大家帮帮我呀 :)
回复
发动态
发帖子
控件
创建于2007-09-28

1422

社区成员

VB 控件
申请成为版主
社区公告
暂无公告