vb编程:VB编程开发常见窍门技巧来源: 发布时间:星期四, 2009年1月15日 浏览:42次 评论:0
Visual Basic(以下简称VB)是Windows下个面向对象可视 化开发环境,功能非常强大下面笔者就自己在实际软件Software开发过程中 获得些经验和大家作以交流
提示钮实现 如果自己留心点儿,定注意到了Microsoft公司系列产品 (如Word、Excel甚至B 本身),都为其应用命令按钮提供了信息 如用户不清楚软件Software中所列图标按钮功能, 可将鼠标移至该图标按 钮上,过会儿在其下方就会显示信息,介绍说明它作用,而鼠标移开 后,提示即消失 图1 这里我们利用mousemove这事件来实现先将Label1.visible 设置为False再输入以下代码 Private Sub Command1_MouseMove(Button As 若按钮放在Frame中,则将Form_mousemove事件改为Frame_mousem ove即可,或干脆 2者都写 背景设置 我们进行软件Software设计时,功能实现当然是第位,但人机界面也绝 不容忽视有时我们希望为其加个比较漂亮背景,且自始至终都 在屏幕上我们可让窗体直不释放,但这样效果并不好VB提供 MDI表单(Multiple Document Interface即多文档界面)是个包含 多个子表单容器,是应用背景表单我们可插入MDI表单( 选Insert、MDI Form即可),这样就使应用具有了MDI功能在MDI 窗体Picture属性中加入想要图片,然后把其它表单MDIChild属性 设置为True,使它们成为MDI主菜单子表单个应用只能有 个MDI表单,但可有多个各不相同非MDI子表单这点在Word、Exc el中都有体现如Micrs oft Excel中包含工作表和图表子菜单,作为 些普通对话框宿主 Tab键和回车键 ①用过VB人定知道,用文本框Text输入时很不方便,VB本 身并不支持回车而自动跳到下个Control控件这点可用Keypress事件来 解决 Private Sub Text1_KeyPress(KeyAscii As Integer) ②另外,文本框在用户按回车键时会发出蜂鸣声,如何避免呢?输 入以下代码: Private Sub Text eyPress(KeyAscii As Integer) 即可避免而且用户按回车键常常有定目——跳到下个 Control控件,我们可让Tab键模拟回车键,只要在Keyascii=0前回上句sendk eys"{Tab}"即可 快捷菜单实现 利用鼠标右键弹出菜单功能简单方便如在Win95资源管理器中, 选中文件目录或文件后按右键即弹出菜单,可选"发送"项,很方便 拷贝至A盘;Desktop上按右键亦可方便修改桌面属性,这些都无疑极大 程度地方便了用户我们利用VB编程时,也可实现这功能在菜单 编辑器中定义好菜单文件后,对鼠标右键编写对应响应代码即可(必 须有下级菜单) Private Sub Form_MouseDown(Button As Integer,Sht As In teger,X As Single, As Single)If Button=2 Then PopupMenu mhel p End Sub 若想原菜单不显示在屏幕上,可将其Visible设为False(如本例中 为mhelp)图3 滚动条 笔者认为,VB4.0中提供滚动条功能还不够完善,过程控制都得 用户自己去实现,如要用滚动条去控制文本框或标签,我们可将其Inde x属性改为0,利用控制下标来移动(如Tex( text).move X,Y),再 将其Visible作相应改变即可但如果开发较大、控制较多 话,则需要把它们从内存中释放(即Unload),为顺利运行留下更多 内存空间此时需小心控制其下标以正确运行 按钮名动态变化 由于桌面空间有限,我们不可能同时在屏幕上放很多Control控件,否则 会显得特别拥挤但我们可从Foxpro Wizard开发中得到启示 如"追加"按钮揿下去后,即变为"存盘"或"放弃"我们可将命令按 钮Caption(或Text)属性变掉!如Command1Caption开始设置为"追 加",输入以下代码: Private Sub Command1_Click 使用Windows本身提供应用 在开发实际应用中,我们可能要用到诸如计算机、书写器 、画笔等Windows提供工具要实现这点其实很方便如要使用 计算器,只要输入以下代码即可: Private Sub Command1_Click 这点,如和上面提到快捷菜单结合起来则实现 0
相关文章读者评论发表评论 |