vb编程语言代码 最早的编程语言
大家好,如果您还对vb编程语言代码不太了解,没有关系,今天就由本站为大家分享vb编程语言代码的知识,包括最早的编程语言的问题都会给大家分析到,还望可以解决大家的问题,下面我们就开始吧!
用VB编写一个计算器程序的代码
1、创建控件组的方法
首先创建一个命令按钮,调整其大小(觉得合适就行),名称为Command1,Caption属性为数字 0;然后进行“复制”和“粘贴”,当选择“粘贴”时,出现对话框提示已有一个同名控件,询问是否创建控件组,选择“是”后,即创建了一个名为“Command”的控件组。
这时,第一个按钮的Index属性值默认为“0”,第二个的Index属性值自动设为“1”,并且大小与第一个按钮相同,只需修改其 Caption属性为数字“1”并将其拖至合适位置即可。此后继续使用“粘贴”的方法建立其他控件组中其余按钮,共20个按钮,每建立一个,就将它拖到合适处,并修改相应的Caption属性值。
2、各控件组其属性设置如下:
设置效果如下图所示:
二、编写代码
Dim s1 As Single, s2 As Single, ysf As String
‘定义两个单精度数变量用与存放参与运算的数,一个字符型存放运算符
Private Sub Command1_Click(Index As Integer)
Text1.Text= Text1.Text& Command1(Index).Caption’将command1的单击事件与文本框显示的内容连接
End Sub
Private Sub Command2_Click()
Text1.Text= Text1.Text+“。”
If(InStr(Text1.Text,“。”)= 1) Then‘第一位不能为小数
Text1.Text=“”
End If
If InStr(Text1.Text,“。”)《 Len(Text1.Text) Then’防止出现两个小数点
Text1.Text= Left
(Text1.Text, Len(Text1.Text)- 1)
End If
End Sub
Private Sub
Command3_Click()
s2= Val(Text1.Text)‘开始加减乘除运算
Select Case ysf Case“+”
Text1.Text= s1+ s2
Case“-”
Text1.Text= s1- s2
Case“*”
Text1.Text= s1* s2
Case“/”
If s2= 0 Then
MsgBox“分母不能为零!”
Text1.Text=“”
Else
Text1.Text= s1/ s2 End If End Select
Text1= IIf(Left(Text1.Text, 1)=“。”, 0& Text1.Text, Text1.Text)‘
这个很关键,如果没有这个的话,得出小于1的小数前面没有0
End Sub
Private Sub Command4_Click()
If Text1.Text=“” Then’文本为空就结束
Exit Sub
End If
Text1.Text= Left(Text1.Text, Len(Text1.Text)- 1)‘文本退一格
End Sub
Private Sub Command5_Click()
Text1.Text=“”’清除当前框内文本
End Sub
Private Sub Command6_Click(Index As Integer)
s1= Val(Text1.Text)‘将s1隐藏起来 ysf= Command6(Index).Caption
Text1.Text=“”
End Sub
Private Sub Command7_Click()
If Left(Text1.Text, 1)《》“-” Then’判断作为负数
Text1.Text=“-”& Text1.Text
Else
Text1.Text= Right(Text1.Text, Len(Text1.Text)- 1)
End If
End Sub
Private Sub Command8_Click()
Text1.Text= Text1.Text* Text1.Text‘平方
End Sub
拓展资料Visual Basic(VB)是由微软公司开发的包含环境的事件驱动编程语言。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松地使用VB提供的组件快速创建一个应用程序。
参考链Visual Basic——百度百科接
怎么看VB代码、又怎么编写代码
要看VB代码,首先得知道这些代码是什么意思,所以要先学习和了解VB函数及使用及操作方法。
建议先看几本VB编程的书,如:Visual Basic程序设计康丽军吴红萍主编北京大学出版社这本书讲的很基础,感觉比较适合初学者。
学习了基本的函数后,就可以对照书中的实例,编写自己的程序了。比如,一个简单的例子。
点击按钮,显示对话框:
1,打开VB,新建程序,然后在窗体中添加一个Command1控件。
2,点击Command1,添加代码:Msgbox"你好!"
3,点击即可。
4,代码编写完毕。
*VB6.0全称为VisualBasic 6.0,是微软公司推出的可视化编程工具之一,是目前世界上使用最广泛的程序开发工具。
VB常用语言
项目(Project):是用户创建的文件集合,这个集合包括用户的Windows应用程序。
控件(Control):是Toolbox窗口中用户置于窗体上的工具,用于配合用户控制程序流程。
代码(Code):是所写的编程语句的另一个名字。像素(Pixel):代表图形元素,表示监视器上最小的可寻址的图形点。
全局变量(Global Variable):就是在整个模块内或整个应用程序内均可使用的变量。
函数(Function):是一个例程,接受零个、一个或多个参数并根据这些参数返回一个结果。
死循环(Infinite Loop):是一个永不终止的循环。
语法错误(Syntax Error):是由于拼错一条命令或使用不正确的语法引起的一种错误。
消息框(Message Box):是为向用户提供信息而显示的对话框。
循环(Loop):就是一组重复执行的程序指令集。
赋值语句(Assignment Statement):是用来给控件、变量或其他对象赋值的程序语句。
结构化程序设计(Structured Programming):是一种程序设计方法,用它来把长程序分成几个小过程,尽可能分得详细一些。
调用过程(Calling Procedure):是触发其他过程执行的过程。
被调用过程(Called Procedure):是由其他过程调用的过程。
标准函数过程(Standard Function Procedure):是一个独立的非事件过程,当被其他过程调用时,它完成一定的工作并返回一个值给调用者。
标准子程序过程(Standard Subroutine Procedure):是一个独立的非事件过程,当被其他程序调用时,它完成一定的工作。
引用传递(By Reference):是一种传递值并允许被调用过程修改这些值的方法。它也叫做通过地址传递(By Address)。
值传递(By Value):是一种传递值并保护调用过程的传递数据,因而被调用过程不能改变此数据的方法。
编辑掩码(Edit Mask):是一个格式字符串,例如“#,###,##”,它指定怎样显示数字和字符串数据。
关于本次vb编程语言代码和最早的编程语言的问题分享到这里就结束了,如果解决了您的问题,我们非常高兴。