论坛: 编程破解 标题: VisualBasic使用技巧 复制本贴地址    
作者: ziaichen [ziaichen]    论坛用户   登录
  1防止程序被重复运行 如果你不希望你的VB应用程序被别人通过多次双击图标而重复运行,导致内存不足或其它意外,你可以在程序中增加以下几行:
  Private Sub Form_ Load
  if app.previnstance then
  msgbox ″程序正在运行,请检查窗口是否被最小化。″
  end if
  End Sub
  2用UCase函数保障文件操作的正确性 在WIN32平台下,文件名一般为小写字母,但在WIN95平台,有时会出现大写。为保障在WIN32平台下用VB3开发的涉及到文件操作的程序在WIN95平台也能正常工作,可以用UCase函数转换文件名的大小写。例如:在WIN32平台下用VB3开发一个媒体浏览器,可以用以下程序段实现自动播放,而不论文件的后缀名为大写的“ AVI”、“WAV”、“MID”,还是小写的“ avi”、“wav”、“mid”,还是大小写混合:
  Sub File1_Click()
  MMcontrol1.filename=File1Path&″\″&File1.filename
  t=UCase(Right(File1filename,3))
  If t=″AVI″ Or t=″WAV″ Or t=″MID″ Then
  MMcontrol1.Command=″close″
  MMcontrol1.Command=″play″
  End if
  End Sub
  3在VB5中汉字的长度为1而不是2 在VB3中每个汉字的长度为2,而在VB4和VB5中每个汉字的长度为1。在截取汉字字符串的子串时需特别引起注意,这种变化对设计汉字的排序、检索、筛选程序带来了较大的方便。另外,在 VB5中汉字的ASCII码小于0,而在VB3或C++里,汉字的 ASCII码均大于零。

地主 发表时间: 12/05 11:43

回复: jhkdiy [jhkdiy]   版主   登录
我支持你

B1层 发表时间: 12/11 21:15

回复: rshu [rshu]   论坛用户   登录
你的意见不错啊,真要谢谢你,许多 vbuser 支持你

B2层 发表时间: 12/12 11:44

回复: ziaichen [ziaichen]   论坛用户   登录
呵呵,谢谢夸奖

B3层 发表时间: 12/12 20:26

回复: mulifeng [mulifeng]   论坛用户   登录
还可以

B4层 发表时间: 12/13 14:50

论坛: 编程破解

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写:NetDemon

粤ICP备05087286号