
可视化程序设计一般有一下步骤
设计程序界面
编写程序代码
调试、运行程序;面向对象的程序设计以对象为中心,以事件为过程执行的起点
例题:
设计一个简易的打字测试程序,单击“开始”按钮,计时开始,输入字符;单击“结束”按钮,程序输出打字速度。
(1)启动VB,新建一个VB标准EXE工程。单击工具箱中的文本框控件(TextBox),将鼠标指针移到窗体上,拖动十字线在窗体上画出大小适当的控件。
(2)用同样的方法在窗体中添加两个命令按钮控件(CommandButton)、两个标签控件(Label)和一个文本框控件。
(3)通过属性窗口可以更改对象的原有属性。
(4)双击“frmTest”窗体中的“开始”按钮,打开对应的代码窗口。在对象中=列表框中选择“通用”,输入代码。
(5)在对象列表框中选择“cmdStart",在过程列表框中选择”Click"事件。输入代码。
(6)保存工程,运行程序。
可以分为三步:
第一步:设计程序的界面
这是最有趣的一步,你根据你要实现的功能画出程序的界面,很有点摆积木的味道。
第二步:编写代码
最枯燥的一步,根据程序的功能,为每个控件元素编写代码,这一步是程序设计的关键所在。
第三步:发布应用程序
为你的程序创建安装项目。如果是自己使用,这一步可忽略。
以下是代码:
Dim i As Integer '存放秒值变量
Rem “开始”按钮对象中的程序
Private Sub Command1_Click()
i = Text1Text '文本框对象中输入的秒值放入i变量
Timer1Enabled = True '使定时器开始工作进行循环
End Sub
Private Sub Command2_Click()
End
End Sub
Rem 定时器对象中的程序
Private Sub Timer1_Timer()
i = i - 1 '秒数递减
Text1Text = i '将递减后的秒数值显示在文本框中
If i = 0 Then Timer1Enabled = False '当秒值递减到0时关闭定时器,停止循环
End Sub
1 用VB新建一个标准EXE程序
2 用 Lable 、TextBox 和 CommandButton 控件在窗体中设计界面如下:
3 双击“抽取”按钮,并在代码窗口中修改代码如下:
Private Sub Command1_Click()
Dim v1 As Long, v2 As Long, v3 As Long
v1 = Val(Text1)
v2 = Val(Text2)
v3 = Int(Rnd(1) (v2 - v1 + 1)) + v1
Text3Text = v3
End Sub
4按F5运行,并进行测试即可
Private Sub Command1_Click()
Static n As Long, m As Long
m = Val(Text2)
n = n + 1
If Text1 = "psw123" Then
MsgBox "口令正确", vbExclamation, "登录"
n = 0
Else
If n >= m Then
MsgBox n & "次输入错误,请退出", vbExclamation, "登录"
End
Else
MsgBox "第" & n & "次口令输入错误,请重新输入", vbExclamation, "登录"
Text1SetFocus
End If
End If
End Sub
Private Sub Form_Load()
Label1Caption = "口令:"
Label2Caption = "允许输入口令的次数:"
Command1Caption = "确定"
MeCaption = "登录"
Text1 = ""
Text1PasswordChar = ""
Text2 = 3
End Sub
以上就是关于使用VB进行程序设计有哪些步骤全部的内容,包括:使用VB进行程序设计有哪些步骤、VB编写程序的步骤、VB程序编写等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)