ｖｂ实验课编程技巧论文

《ｖｂ实验课编程技巧论文》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、ＶＢ实验课编程技巧论文【摘要】本文在VB实验课的角度，为使学生更加深入地掌握编程技能，介绍了几个常用和典型的编程技巧。VisualBasic利用可视化技术进行编程，避免了面向过程语言的许多细节。因此，学生比较容易掌握VB程序设计的基本知识。就VB实验课而言，应当尽可能多的进行编程的练习。本文介绍几个较为典型的编程技巧，希望能对学习VB的同学有所帮助。【关键词】VB实验课编程技巧一、创建自定义的光标在设计一个应用程序时，VisualBasic许多控件的MousePointer属性允许程序员在预先定义好的若干个鼠标光标形状之中任选其一。但在应用程序中.freel1。

2、在Form1上添加一个文本框控件Text1。在Text1控件的DragIcon属性的设置对话框中选择一个指针形状（.ICO文件）。将如下代码添加到Text1的MouseMove事件中：PrivateSubText1_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Text1.Drag1'icononEndSub将如下代码添加到Form1的DragOver事件中：PrivateSubForm_DragOver(SourceAsControl,XAsSingle,YAsSingle,State

3、AsInteger)Text1.Drag0'iconoffEndSub运行此程序。将鼠标指针移动到该文本框控件上时，程序将把所选中的.ICO文件作为默认的鼠标光标；将鼠标指针离开该控件时，光标则会自动恢复为默认的形状。其他控件也可以如此设置，包括没有MousePointer属性的控件。二、在窗体上单击鼠标右键弹出一个快捷菜单在操作系统和应用软件的视窗中，点鼠标右键时，会弹出一个快捷选单。VisualBasic程序里也可以实现类似的功能。首先，利用VB的菜单编辑器（MenuEditor）编辑所希望弹出的菜单及子菜单，并将主菜单的Visible属性设置为False，

4、将其以下各级菜单的Visible属性设置为True。假设主菜单名为“文件”，一级下拉菜单包括“新建”、“打开”、“关闭”三个菜单项。在窗体Form1（也可以是任意控件）的MouseDo-MouseDoonDialogControl6.0”，完成加载工作；然后画一个PictureBox，采用默认名字Picture1,再在Picture1上面画一个PictureBox，默认名字为Picture2，设置：Picture2.AutoSize=TRUE；接着，加上水平和垂直滚动条，默认名字分别为：HScroll1，VScroll1；加载图形到Picture2上；最后，在窗

5、体中引入其它控件：一个按钮（mand），默认名为mand1和一个“MicrosoftmonDialogControl”，默认名为monDialog1。具体代码如下：PrivateSubForm-Load()Picture2.Left=0：Picture2.Top=0：Picture2.in=0：HScroll1.Min=0：HScroll1.Min=0VScroll1.Max=Picture2.Height－Picture1.HeightHScroll1.Max=Picture2.ax〈0ThenHScroll1.Enabled=FalseIfVScroll1.

6、Max〈0ThenVScroll1.Enabled=FalseEndSubPrivateSubmand-Click()OnErrorGoToErrExitmonDialog1.Filter=“Bitmapfile(*.bmp)

7、*.bmp

8、AllFile(*.*)

9、*.*”monDialog1.FilterIndex=1：monDialog1.ShoonDialog1.filename)VScroll1.Min=0：HScroll1.Min=0VScroll1.Max=Picture2.Height－Picture1.HeightHScroll1.Max=Pic

10、ture2.ax〈0ThenHScroll1.Enabled=FalseIfVScroll1.Max〈0ThenVScroll1.Enabled=FalseErrExit:EndSubPrivateSubHScroll1-Change()Picture2.Left=－HScroll1.ValueEndSubPrivateSubVScroll1-Change()Picture2.Top=－VScroll1.ValueEndSub该程序通过点击mand1按钮，在弹出的对话框中选择一个图形文件加载到Picture2中，利用水平和垂直滚动条就可以实现图片的滚动。四、文本

11、框中文本的某一特定字符或