实验二实验报告Word文档格式.docx

实验二实验报告Word文档格式.docx

《实验二实验报告Word文档格式.docx》由会员分享，可在线阅读，更多相关《实验二实验报告Word文档格式.docx（17页珍藏版）》请在冰豆网上搜索。

【分析】

（1）界面分析（用到哪些控件）

窗体、命令按钮。

（2）程序分析（用到哪些算法和关键技术）

1.利用两个标签制作阴影效果，两个标签显示的文字相同，字体相同，但颜色不同，作为阴影现实的标签文字为黑色；

两个标签的位置不同，在属性窗口中调整提昂个标签的Tophe和Left属性值，时期产生交错的阴影效果；

在程序中通过设置阴影标签的Visible属性即可实现阴影或取消阴影的效果。

2.通过设置按钮的Enabled属性可是按钮变为可用或不可用状态。

【设计】

（1）界面设计（给出界面截图）

（2）代码设计（给出程序代码）

PrivateSubCmdNew_Click（）

Label1.Visible=True

CmdOld.Enabled=True

CmdNew.Enabled=False

EndSub

PrivateSubCmdOld_Click（）

Label1.Visible=False

CmdOld.Enabled=False

CmdNew.Enabled=True

【运行结果】

（给出运行结果界面截图）

2.实验2.2

设计一个简单的文本操作程序。

单机隶书按钮，可以设置文字的字体为隶书；

单击放大和缩小按钮，可以改变文字的大小；

单机复制按钮，可以将选择的文字复制到右侧的文本框，单击剪切按钮，可以讲选择的文字剪切到右侧文本框。

命令按钮、文本框、标签、窗体。

1.通过设置问问你笨矿的Font属性乐意改变文本框中文本的字体和字号。

2.在复制和剪切功能中，需要将选中的你诶荣及其字体格式复制或剪切到右侧的文本框。

3.通过文本框的SelText属性可以获得选中的内容。

PrivateSubCommand1_Click（）

Text1.FontName="

隶书"

PrivateSubCommand2_Click（）

Text1.FontSize=Text1.FontSize+1

PrivateSubCommand3_Click（）

Text1.FontSize=Text1.FontSize-1

PrivateSubCommand4_Click（）

Text2.Text=Text1.SelText

Text2.FontName=Text1.FontName

Text2.FontSize=Text1.FontSize

PrivateSubCommand5_Click（）

Text1.SelText="

"

PrivateSubForm_Load（）

Text1.Text="

欲穷千里目，更上一层楼"

1.实验2.3

实际一个华氏温度与摄氏温度之家转换的程序。

首先在指定的文本框中输入数据，然后单击摄转华按钮，即可将摄氏温度转化为华氏温度；

单击划转舍按钮即可将华氏温度转化微微摄氏温度，单击清楚按钮，则将文本框中的数据清除，并将输入焦点赚为化石文本框中，等待输入新的数据；

推出按钮，则结束程序进行。

（3）界面分析（用到哪些控件）

窗体、命令按钮、文本框、标签。

（4）程序分析（用到哪些算法和关键技术）

可以通过Format函数控制计算结果保留两位小数。

PrivateSubCommand1_Click（）

Dimf!

c!

f=Val（Text1.Text）

c=5/9*（f-32）

Text2.Text=Format（c,"

0.00"

）

c=Val（Text2.Text）

f=9/5*Val（Text2.Text）+32

Text1.Text=Format（f,"

Text2.Text="

Text1.SetFocus

End

1.实验2.4

设计一个简单的四则运算计算器程序。

在文本框输入数据，单击命令按钮，即可的到运算结果单击清楚即可清除文本框数据。

（5）界面分析（用到哪些控件）

（6）程序分析（用到哪些算法和关键技术）

通过文本框的Text属性指控可以事先清除数据

PrivateSubCmdAdd_Click（）

label3.Caption=Val（Text1.Text）+Val（Text2.Text）

PrivateSubCmdExit_Click（）

PrivateSubCmdSub_Click（）

label3.Caption=Val（Text1.Text）-Val（Text2.Text）

1.实验2.5

打印一个三角形图案的程序。

在行数文本框输入行数，字符文本框输入要打印的字符单击图案按钮即可显示三碱性的图案单击清除按钮即可清除图案单击推出按钮则推出程序。

（7）界面分析（用到哪些控件）

窗体、命令按钮、文本框、标签、计时器。

（8）程序分析（用到哪些算法和关键技术）

使用两个计时器控件控制图案的打印

（1）界面设计（给出界面截图）】

DimnAsInteger

DimchAsString

DimhAsInteger

n=0

h=Val（Text1.Text）

ch=Text2.Text

Timer2.Interval=（h+1）*200

Timer1.Enabled=True

Timer2.Enabled=True

PrivateSubTimer1_Timer（）

n=n+1

PrintTab（28-n）;

String（2*n-1,ch）

PrivateSubTimer2_Timer（）

Timer1.Enabled=False

Timer2.Enabled=False

Cls

1.实验2.6

设计一个计算构成所发工资的各种面额钞票张数最少的付款方案

（9）界面分析（用到哪些控件）

文本框、按钮

（10）程序分析（用到哪些算法和关键技术）

可以通过整除运算计算某种面额钞票的张数，通过求余运算计算去掉该种面额后剩余的工资数

DimxAsLong,yAsLong

x=Val（Text1.Text）

y=x\100:

Text2.Text=y

x=xMod100

y=x\50:

Text3.Text=y

x=xMod50

y=x\20:

Text4.Text=y

x=xMod20

y=x\10:

Text5.Text=y

x=xMod10

y=x\5:

Text6.Text=y

x=xMod5

Text7.Text=x

Text3.Text="

Text4.Text="

Text5.Text="

Text6.Text="

Text7.Text="

2.实验2.7

倒计时，计时器

计时器

使用计时器控件控制倒计时，通过整除和求运算计算出剩余的时间

DimtAsInteger

t=Val（Text1.Text）*3600+Val（Text2.Text）*60

Command1.Enabled=False

Command2.Enabled=True

Command1.Enabled=True

Command2.Enabled=False