




已阅读5页,还剩1页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
实验五/六:Windows 界面设计基础一、实验目的熟悉 Windows 窗体及其各种基本控件的功能和用法二、实验内容利用 Windows 窗体及其各种基本控件实现简易计算器。三、实验组织运行要求编写的源程序要立即上机编译运行来检验程序中存在的问题。通过运行的结果验证程序的功能是否实现。有一些系统类的方法、变量也需要上机实验去了解它们的含义。四、实验条件Windows XP, Visual Studio 2005五、实验步骤using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Linq;using System.Text;using System.Windows.Forms;namespace 学友计算器public partial class Form1 : Formpublic Form1()InitializeComponent();private string fh = “;private string first = “;private void button1_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text+ “1“;private void button2_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “2“;private void button3_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “3“;private void button4_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “4“;private void button5_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “5“;private void button6_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “6“;private void button7_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “7“;private void button8_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “8“;private void button9_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “9“;private void button10_Click(object sender, EventArgs e)textBox1.Text = textBox1.Text + “0“;private void buttondot_Click(object sender, EventArgs e)if (textBox1.Text.IndexOf(“.“) 0)textBox1.Text += “.“; /如果textBox1中的“.”个数小于0(即没有),则在数后面加一个“.”else /如果textBox1中有了一个以上的“.”,则什么也不做private void buttonFs_Click(object sender, EventArgs e) /表示正负数textBox1.Text = Convert.ToString(Convert .ToDouble (this.textBox1.Text) * -1);private void buttonbs_Click(object sender, EventArgs e) /退格if (textBox1.Text = “)textBox1.Text = “;elsetextBox1.Text = textBox1.Text.Substring(0, textBox1.Text.Length - 1);private void buttonClear_Click(object sender, EventArgs e)textBox1.Text = “;private void buttonAdd_Click(object sender, EventArgs e)first = textBox1.Text;textBox1.Text = “;fh = “+“;private void buttonsub_Click(object sender, EventArgs e)first = textBox1.Text;textBox1.Text = “;fh = “-“;private void buttonMul_Click(object sender, EventArgs e)first = textBox1.Text;textBox1.Text = “;fh = “*“;private void buttonDis_Click(object sender, EventArgs e)first = textBox1.Text;textBox1.Text = “;fh = “/“;private void buttonQy_Click(object sender, EventArgs e)first = textBox1.Text;textBox1.Text = “;fh = “%“;private void buttonx2_Click(object sender, EventArgs e)if (textBox1.Text = “)textBox1.Text = “;elsefirst = textBox1.Text;textBox1.Text = Convert.ToString(Convert.ToDouble(textBox1.Text) * Convert.ToDouble(textBox1.Text);private void buttonsqrt_Click(object sender, EventArgs e)if (textBox1.Text = “)textBox1.Text = “;elsefirst = textBox1.Text;if (Convert.ToDouble(first) 0)MessageBox.Show(“开平方根的数不能小于0,请重新输入“, “错误“, MessageBoxButtons.OK, MessageBoxIcon.Error);elsetextBox1.Text = Convert.ToString(Math.Sqrt(Convert.ToDouble(first);private void buttonDy_Click(object sender, EventArgs e)if (textBox1.Text = “)textBox1.Text = “;elseswitch (fh)case “+“:textBox1.Text = Convert.ToString(Convert.ToDouble(first) + Convert.ToDouble(textBox1.Text);break;case “-“:textBox1.Text = Convert.ToString(Convert.ToDouble(first) - Convert.ToDouble(textBox1.Text);break;case “*“:textBox1.Text = Convert.ToString(Convert.ToDouble(first) * Convert.ToDouble(textBox1.Text);break;case “/“:if (Convert.ToDouble(textBox1.Text) = 0)MessageBox.Show(“除数不能为0“, “错误“, MessageBoxButtons.OK, MessageBoxIcon.Error);elsetextBox1.Text = Convert.ToString(Convert.ToDouble(first) /
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 比智高协议书
- 1.一纸离婚协议书
- 包头停暖协议书
- 固定投资协议书
- 安置房买卖协议书
- 安全协议书怎么写
- 短期劳务协议书
- 工价表协议书
- 非因工死亡赔偿协议书
- Lesson 2 Greening the Desert说课稿高中英语北师大版2019必修三-北师大版2019
- GB/T 46148-2025电动汽车智能充放电设备技术规范
- 2025影视演出经纪居间合同正规范本
- 对外投资管理知识培训
- 道闸操作安全培训课件
- 普惠金融赋能乡村振兴的实践探索和政策建议-福建省安溪县为例
- 酒店电气使用安全培训课件
- 上海区域出租车考试题目及答案
- 无线通信技术知识培训课件
- 银行公司不良资产处置细则
- savina300呼吸机课件教学课件
- 2025-2030中国智能制造示范工厂建设标准与绩效评价体系
评论
0/150
提交评论