vb郭贤海实验报告及答案

vb郭贤海实验报告及答案

ID:34004992

大小:1.30 MB

页数:50页

时间:2019-03-03

vb郭贤海实验报告及答案_第1页
vb郭贤海实验报告及答案_第2页
vb郭贤海实验报告及答案_第3页
vb郭贤海实验报告及答案_第4页
vb郭贤海实验报告及答案_第5页
资源描述:

《vb郭贤海实验报告及答案》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、实验1・1设计一个程序,程序运行的初始界面如图1・1所示。当单击“显示”按钮时,在文本框中显示“欢迎使用VB!”(图1・1);当单击“清除”按钮时,清除文本框内的文本;当单击“退出”按钮吋,结束程序运行。图1-1程序运行初始界面图1-2单击“显示”按钮后的程序界面实验1・2设计一个程序,程序运行的初始界面如图1・3所示,其中“显示”按钮为不可用。同时要求:(1)当单击“改变文字”按钮时,在左边标签文字内容改为“你好,张三!”,同时“改变文字”按钮变为不可用(图1-4);(2)当单击“隐藏”按钮时,将左边标签设为

2、不可见,同时“隐藏”按钮变为不可用,“显示”按钮变为可用(图1-5):(3)当单击“显示”按钮时,重新显示左边标签,同时“隐藏”按钮变为可用,“显示”按钮变为不可用(图1・4)。凰习题1-2口回凶改变文字你好,欢迎使fflVB!隗藏显示图1-3第1题的程序运行初始界面图1・4单击“改变文字”按钮后的程序界面图1-5单击“隐藏”按钮后的程序界面四、实验原始记录实验1.1程序的界面设计。(可以是多张主要的图。下面的图要替换成你们自己设计的图。如何取图?设计好界面,按"PrintScreenSysRq"键,打开画图软

3、件,单击“编辑

4、粘贴”命令,利用菜单栏下方的“选定”功能,选屮窗体,按“Grl+C”键,然后选屮下面的实验样例图,按“Ctrl+V”键,替换掉)程序代码。PrivateSubCommand1_Click()Text1.Text=”欢迎使用VB!HEndSubPrivateSubCommand2_Click()Text1.Text二”“EndSubPrivateSubCommand3_Click()EndEndSub实验1・2程序的界面设计。(可以是多张主要的图。下血的图要替换成你们自己设计的图)程序代码。Pri

5、vateSubCommandl_Click()Label1.Visible=TrueCommand2.Enabled=TrueCommand1.Enabled=FalseEndSubPrivateSubCommand2_Click()Label1.Visible=FalseCommand2.Enabled=FalseCommand1.Enabled=TrueEndSubPrivateSubCommand3_Click()Label1.Caption=H你好,张三!“Command3.Enabled=FalseE

6、ndSub五、实验结果及分析实验1・1运行结果。(可以是多张主要的图。输入数据,显示结果。下面的图要替换成你们自己的图。如何取图?运行程序,按"Alt+PrintScreenSysRqn键,选中下面这张图,按"Ctrl+V”键,替换掉)实验1・2运行结果。(可以是多张主要的图。输入数据,显示结果。下血的图要替换成你们自己的图)圍习题1-2口回冈你好,张三!改变文字1显示1实验2・1设计一个程序,运行吋界面如图2-1所示。当单击“左”、“右”、“上”、“下”按钮时,标签分别向左、右、上、下移动。图2・1程序运行时

7、的界面实验2・2设计一个程序,在文本框中输入一个3位整数,单击按钮后,在标签上输出该数的百位数、十位数和个位数,运行界面如图2-2所示。图2-2程序运行时的界面实验2・3设计一个程序,实现简单计算的功能,运行界面如图2・3所示。图2・3程序运行时的界面实验2・4设计一个程序,单击“输入”按钮可弹出一个输入对话框,提示用户输入带区号的电话号码,区号为4为,号码为8位,比如输入“0571-86281517",然后将区号和电话号码在消息对话框中显示出来,运行界面如图2-4所示。图2-4程序运行时的界面四、实验原始记录

8、实验2.1程序的界面设计。程序代码。PrivateSubCommand1_Click()LabelI.Left=Label1.Left・100EndSubPrivateSubCommand2_Click()Label1.Left=Label1.Left+100PrivateSubCommand3_Click()Label1.Top=Label1.Top-100EndSubPrivateSubCommand4_Click()Label1.Top=Label1.Top+100EndSub实验2.2程序的界面设计。程

9、序代码。PrivateSubCommandl_Click()DimaAsInteger,bAsInteger,cAsIntegera=Left(Textl.Text,1)b=Mid(Textl.Text,2,1)c=Right(Textl.Text,1)Label1.Caption=H百位数:“&a&”十位数:“&b&“个位数:”&cEndSub实验2.3程序的界面设计。程序代码。Pr

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。