VB简单计算器编程代码(附图)VIP免费

课程设计说明书正文 一、题目：计算器的创作和相应程序的编写 二、本题的主要功能：通过计算器的创作熟悉各控件的属性和练习程序的编写。 三、程序截图： 四、源程序清单： Begin VB.Form Form1 Caption = "计算器" ClientHeight = 3765 ClientLeft = 165 ClientTop = 855 ClientWidth = 5355 Icon = "Form1.frx ":0000 LinkTopic = "Form1" LockControls = -1 'Tru e ScaleHeight = 3765 ScaleWidth = 5355 StartUpPosition = 3 '窗口缺省 Begin VB.CommandBu tton Command4 Caption = "=" Height = 495 Left = 4470 TabIndex = 28 Top = 3060 1 Width = 735 End Begin VB.CommandBu tton Command3 Caption = "1/x " Height = 495 Left = 4470 TabIndex = 27 Top = 2520 Width = 735 End Begin VB.CommandBu tton Command2 Caption = "%" Height = 495 Left = 4470 TabIndex = 26 Top = 1980 Width = 735 End Begin VB.CommandBu tton Command1 Caption = "sqrt" Height = 495 Left = 4470 TabIndex = 25 Top = 1440 Width = 735 End Begin VB.CommandBu tton cmbDOT Caption = "." Height = 495 Left = 2910 TabIndex = 24 Top = 3060 Width = 735 End 2 Begin VB.CommandBu tton cmbZF Caption = "+/-" Height = 495 Left = 2130 TabIndex = 23 Top = 3060 Width = 735 End Begin VB.CommandBu tton cmbSign Caption = "+" Height = 495 Index = 3 Left = 3690 TabIndex = 22 Top = 3060 Width = 735 End Begin VB.CommandBu tton cmbSign Caption = "-" Height = 495 Index = 2 Left = 3690 TabIndex = 21 Top = 2520 Width = 735 End Begin VB.CommandBu tton cmbSign Caption = "*" Height = 495 Index = 1 Left = 3690 TabIndex = 20 Top = 1980 Width = 735 3 End Begin VB.CommandBu tton cmbSign Caption = "/" Height = 495 Index = 0 Left = 3690 TabIndex = 19 Top = 1440 Width = 735 End Begin VB.CommandBu tton cmbNUM Caption = "9" Height = 495 Index = 9 Left = 2910 TabIndex = 18 Top = 1...