《Windows 程序设计》实验报告实验二

《Windows程序设计》实验报告班级：计算机3班姓名：XXX学号：实验日期：10.17指导教师：小米实验名称实验二程序设计基础实验目的掌握整型、长整型、单精度型、双精度型、逻辑型、字符型等数据类型的定义和使用，了解货币型、日期型、变体型等数据类型的表示掌握变量与常量的命名、定义和使用掌握算术运算符、关系运算符和逻辑运算符的使用及其优先级掌握表达式和常用内部函数掌握if选择结构、SelectCase选择结构、循环结构For/Next、whilewend/doloop的应用实验内容1．编写一段代码，求给定一个圆的周长和面积。要求：圆的半径r利用文本框或者InputBox函数从键盘任意输入（r>0）。圆周率定义为符号常量。利用赋值语句将求出的周长和面积赋给变量l和s。用Print方法输出详细结果。2.编写窗体的单击事件代码，在窗体上显示如图2-1所示的图形：AAAAAAAAAAAAAAAA图2-1编写窗体单击事件代码的图形3.编程，用IF语句实现下列分段函数的计算。4.编程，用selcetcase语句将用户输入的百分制成绩转换为等级制输出，百分制成绩由Inputbox函数获得,转换后的等级由Msgbox函数输出5.分别应用for/next语句和while语句求：使表达式值S=1+2+3+……值刚超过200的是那一项Type=ExeForm=Form2.frmReference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\WINDOWS\system32\stdole2.tlb#OLEAutomationIconForm="Form1"Startup="Form1"Command32=""Name="工程1"HelpContextID="0"CompatibleMode="0"MajorVer=1MinorVer=0RevisionVer=0AutoIncrementVer=0ServerSupportFiles=0VersionCompanyName="Microsoft"CompilationType=0OptimizationType=0FavorPentiumPro(tm)=0CodeViewDebugInfo=0NoAliasing=0BoundsCheck=0OverflowCheck=0FlPointCheck=0FDIVCheck=0UnroundedFP=0StartMode=0Unattended=0Retained=0ThreadPerObject=0MaxNumberOfThreads=1[MSTransactionServer]AutoRefresh=1Type=ExeForm=Form3.frmReference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\WINDOWS\system32\stdole2.tlb#OLEAutomationIconForm="Form1"Startup="Form1"Command32=""Name="工程1"HelpContextID="0"CompatibleMode="0"MajorVer=1MinorVer=0RevisionVer=0AutoIncrementVer=0ServerSupportFiles=0VersionCompanyName="Microsoft"CompilationType=0OptimizationType=0FavorPentiumPro(tm)=0CodeViewDebugInfo=0NoAliasing=0BoundsCheck=0OverflowCheck=0FlPointCheck=0FDIVCheck=0UnroundedFP=0StartMode=0Unattended=0Retained=0ThreadPerOb