# 4个VB的问题!!!!!!

Posted by paul on October 06, 1998 at 11:41:14:

1.在表单上布一MaskEdBox,执行,输入"3号4楼",为什
么输到"楼"时,"4"这个字就被吃掉了?

2.Private Declare Function OpenProcess Lib "kernel32" _
(ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long) As Long

Private Declare Function CloseHandle Lib "kernel32" _
(ByVal hObject As Long) As Long

Private Declare Function GetExitCodeProcess Lib "kernel32" _
(ByVal hProcess As Long, lpExitCode As Long) As Long

Const PROCESS_QUERY_INFORMATION = &H400
Const STILL_ALIVE = &H103
Private ExitCode As Long
Private hProcess As Long

pid = Shell("c:\windows\command.com /c c:\a.bat")
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid)
Do
Call GetExitCodeProcess(hProcess, ExitCode)
DoEvents
Loop While ExitCode = STILL_ALIVE
DoEvents
Call CloseHandle(hProcess)
DoEvents
a.bat --> copy h:\a.exe m:\a.exe
为什么程式有时会跳回来主程式,有时又不会而停留在DOS视窗,
要按CTRL+C才会跳回来主程式,有方法解决吗
----------------------------------------------------------------
Microsoft Windows POP_UP Program Support
----------------------------------------------------------------
Your Pop-Up program is ready to run.When you have finished using
it,press Ctrl+C to close this windows and return windows.
----------------------------------------------------------------

3.Print LenB(Trim(StrConv("我1你",VbFromUniCode)))=4
Print LenB(Trim(StrConv("我12你",VbFromUniCode)))=6
为什么第一行不是5而是4

4.网路上有一约200MB之dbf档,且有很多人一直在查询,新增,我用上之方法
开一DOS SHELL 用copy 之方式copy至另一磁碟,为什么我用ACCESS去连
结此一DBF档时会发生错误,有方法解决吗

Follow Ups:

- Re: 4个VB的问题!!!!!! cww 08:36:31 10/07/98 (0)