欢迎来到天天文库
浏览记录
ID:45758197
大小:77.45 KB
页数:104页
时间:2019-11-17
《VB实训指导书》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、VB中级工实训指导书编者:李进徐琴审定:目录任务一集成开发环境任务二常用标准控件任务三菜单与对话框任务四WindowsAPI编程任务五数据库应用任务六动态链接库任务七ActiveX控件附录任务一集成开发环境模块新建控件编辑可执行文件[操作要求]完成下列操作,并将操作结果按要求保存在指定文件夹。1、工程的基本操作(1)创建一个标准EXE工程。(2)修改工程名称为x2_01o(3)在当前工程中移除窗体FORMlo(4)在指定目录下新建名为X2_02的文件夹,并将当前工程保存在该目录下。2、IDE的基本操作(1)添加名为MyForm的窗体到当前工程中,并将其设为启动窗体。(2)在窗体MyForm屮添
2、加一个CommandButton控件。(3)修改窗体MyForm的标题栏为MyForm,将CommandButton控件的显示文本改为Button,并放置在窗体MyForm的正中央。(4)通过屏幕截图(按PrintScreen键)把操作结果保存成MyForm.bmp文件,并保存到当前工程保存的目录下。3、制作可执行文件(1)设置当前工程的属性,将版本号设为l.O.k(1)将当前工程编译为可执行文件X2_01.exe,存放于当前工程保存的目录下。4、部署应用程序(1)启动打包和展开向导,部署当前应用程序。(2)提示是否重新编译程序时,选择否。(3)包类型为标准安装包。在当前工程保存目录下新建名为
3、package的文件夹,将主成的安装包文件存放在该文件夹下。生成单个压缩文件。安装程序标题和脚本名称为x2_01,其余选项接受默认设置。拓展:将commandbutton改为TextBox>Label>DeiveListBox>DirListBox>FileListBox>ComboBox>Hscrollbar>VscrollBar>Timer>4个Option、4个Check、Shape>Data>pictureBox>listbox>line>Image>Frame>OLE控件。任务二常用标准控件模块一字符串反转[操作要求]完成下列操作,并将操作结果按要求保存在指定文件夹中。1、创建工程(
4、1)创建一个标准EXE工程。(2)修改工程名称为X3_01o(3)修改Foirnl的名称和标题栏为MyFormo(4)在窗体MyForm中添加2个Label控件、2个TextBox控件和1个CommandButton控件。2、控件属性设置(1)修改Label1和Label2的显示文本分别为“原字符串”和“反转字符串”并将文本居中显示。(2)清空Textl和Text2文本框中的内容。(3)修改Command1的显示文本为">>>”3、控件事件处理添加Command1的Click事件。4、编写处理程序(1)根据已给出的程序片断和程序注释完成程序。在指定目录下新建名为x3_01的文件夹,并将当前工程
5、保存在该目录下。PrivateSubCommand1_Click()'用于存储原字符串Dimstrorgasstringc用于存储反转后的字符串Dimstrresasstring'将用户输入的原字符串存入变量strorg中Strorg=Textl.Text'将原字符串反转,如“abc”反转后“cba”Strres=(strorg),lf-t行需要补全程序,完成功能'将反转后的字符串在Text2的文本框中显示Text2.Text=strresEndSub(2)编译运行结果。如:RUN:Ibxtl中输入:123,则在Iext2中输出:321模块二大写字母转小写字母PrivateSubCommand
6、1_Click()'用于存储原字符串Dimstrorgasstring'用于存储反转后的字符串Dimstrresasstring'将用户输入的原字符串存入变量strorg屮Strorg=Textl.Text'将原字符串所有字母大写,如“abc”转换后为“ABC”Strres=(stn)Tg),此行需耍补全程序,完成功能,将转换后的字符串在Text2的文本框屮显示Text2.Iext=strresEndSub模块三小写字母转大写字母PrivateSubCommand1_Click()'用于存储原字符串Dimstrorgasstring'用于存储反转后的字符串Dimstrresasstring'将
7、用户输入的原字符串存入变量strorg中Strorg=Textl.Textc将原字符串所有字母小写,如“ABC”转换后为“abc”Strres=(strorg)^此彳亍需要补全程序,完成功能'将转换后的字符串在Text2的文本框中显示Text2.Iext=strresEndSub模块四测试字符串的长度PrivateSubCommandl_Click()c用于存储原字符串Dimstrorgasstr
此文档下载收益归作者所有