admin 管理员组

文章数量: 887032


2024年1月23日发(作者:truncate英文)

VB程序代码(简单小程序)

Option Explicit

Private Sub btnCalculate_Click()

'按钮点击事件,计算两个数的和

'声明变量

Dim num1 As Double

Dim num2 As Double

Dim result As Double

'获取用户输入的数字

num1 = Val()

num2 = Val()

'计算和

result = num1 + num2

'将计算结果展示给用户

n = "计算结果:" & result

End Sub

Private Sub Form_Load()

'窗体加载事件,初始化窗体

'设置窗体标题

n = "简单计算器"

'设置标签的默认文本

n = "请输入第一个数:"

n = "请输入第二个数:"

n = ""

如上所示,这是一个简单的VB程序,包含一个窗体和三个按钮,分别用于计算两个数的和、清空所有输入框和标签的内容以及退出程序。用户可以在两个文本框中输入数字,点击计算按钮后,程序会将两个数字相加并将结果展示给用户。如果用户想重新计算,可以点击清空按钮清除所有输入框和标签的内容,重新输入参数。


本文标签: 用户 按钮 计算 数字 标签