VB编程俱乐部问答

许涛_088

许涛_088

2016-02-19 16:31

给自己一点时间接受自己,爱自己,趁着下午茶的时间来学习图老师推荐的VB编程俱乐部问答,过去的都会过去,迎接崭新的开始,释放更美好的自己。
问:我在学习VB过程中遇到一个问题,如源代码:
  SndPlaySound(″c:MyWorkeep.wav″)
  在制成安装盘后,安装到其它机器中不同目录下就不能执行,必须安装到C:MyWork下才能执行。怎样在源代码中识别,或有更好的办法。
  答:这是初学者经常忽略的一个小问题。在打开文件、调用程序时喜欢使用绝对文件路径。其实,只要使用相对路径,就完全可以避免这个问题。在Windows下,某个程序一旦运行,除非特别指定了工作目录,一般该程序文件所在的目录就是工作目录,其他目录可以用工作目录为参照系。例如,上述问题中,程序被安装到了MyWork目录下,那么在MyWork目录下的所有文件就不必用路径全称了,可以直接SndPlaySound(″Beep.wav″)。以此类推,如果要播放C:MyWorkSoundABC.Wav文件,就可以SndPlaySound(″SoundABC.wav″)。以后无论应用程序安装在何处,都可以避免这一问题。
  
  问:VB5.0生成的Exe文件能不能在一台从没装过VB5.0的机器上运行,如不能应如何做?
  答:当然可以。你只要运行VB5带的“应用程序安装向导”就可以了。向导自动把应用程序及其依赖的DLL、OCX、DAO驱动程序等打包,形成一个安装程序。分发这个安装包就一切搞定了。
  
  问:假设表A有一字段B(文本型,8个字符),当我在表中进行输入时超过8个字符,系统就会禁止我输入,这没有什么问题。但当我在VBA中使用DAO编辑这个字段时,我遇到了麻烦。
  答:可以通过DAO提供的Recordset或TablDef对象来得到字段B的长度,然后,根据情况把你的值直接赋予它或截断后赋值。例如:
  DimdbasDatabase,rsasRecordset
  DimiSizeasInteger,SasString
  setdb=DBEngine.OpenDatabase(″XXX.mdb″)
  setrs=db.OpenRecordset(″TableA″)
  iSize=td(″FieldB″).Size′字段长度
  ……
  ′下面准备赋值
  S=″ABC中DE国FGEGHG″
  setrs=db.OpenRecordset(″TableA″)
  rs.Edit
  IfiSize=LenB(strconv(S,vbFromUnicode))Then
  rs(″FieldB″)=S′直接赋值
  Else
  rs(″FieldB″)=LeftB(strconv(S,vbFromUnicode),iSize)'截断赋值
  EndIf
  rs.Update
  ……
  请注意,VB或VBA中字符串默认以vbUnicode格式保存,所以要转换后再比较运算。请参阅函数StrConv(),参数:vbFromUnicode,vbUnicode,及Byte数组,和以‘B'结尾的函数。
  
  问:我写了个应用程序,第一次进入时想要求用户输入密码,并将密码保存(有什么方法别人看不到)。下次进入时提示输入密码。应如何完成呢?
  答:可以把密码保存到INI文件或注册数据库。一般应用级的用户是不会去看这些密码的。为了防止像你我这样的人观看,比较好的是使用如DES、RC5等加密算法或自行设计一个加密算法,这样才能够达到一个较高的密级。本人设计有一个以DES和自制加密算法混合工作的DLL,如果有兴趣,请与我联系。
  
  问:如何生成一个透明窗体?使得可以看到窗体后面的内容?
  答:用如下代码可生成透明窗体,若要显示其他信息,可做一个背景透明的图案为窗体背景。
  Me.AutoRedraw=True
  hBitmap=CreateCompatibleBitmap(Me.hdc,0,0)
  SelectObjectMe.hdc,hBitmap
  Me.Refresh
  感谢ZhuangYong提供解答
  
  问:在Access97中如何实现代码输入? 
  答:在Access97中的代码输入解决方案是我见过中的比较好的一种。Accesss97至少提供了两种场合使用的代码输入方式。
  其一、在表结构设计窗口,选中指定字段,单击“查阅”标签,改显示控件为组合框或列表框,根据情况选择“行
展开更多 50%)
分享

猜你喜欢

VB编程俱乐部问答

编程语言 网络编程
VB编程俱乐部问答

VB编程问与答

编程语言 网络编程
VB编程问与答

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

VB编程经验点滴

编程语言 网络编程
VB编程经验点滴

VB编程开发常见技巧

编程语言 网络编程
VB编程开发常见技巧

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

VB实用编程两例

编程语言 网络编程
VB实用编程两例

Windows/VB编程逐月通

编程语言 网络编程
Windows/VB编程逐月通

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Win10隐藏桌面回收站图标的方法

Win10隐藏桌面回收站图标的方法

JSP了图形验证码-汉字

JSP了图形验证码-汉字
下拉加载更多内容 ↓