关闭

我做的第一个工程

157人阅读 评论(0) 收藏 举报
       第一次接触工程,自己设计软件,额,虽然这个软件不是设计的,但是当看到自己的劳动成果的时候,真的很骄傲,觉得很开心!
       不过,毕竟是第一次做,额,费了很多的时间不说,第一次做出来的竟 然是错的,额,,当时那个流汗啊,还好有指导我们的学长,他检查了一遍后,意味深长的说道:“你检查一遍吧,没有技术性错误,只有拼写性错误。”后来自己就一个一个字的才对照呢,最后检查出来了,才知道自己的错误原来是那么低级,当时那个悔呀,自己太不小心了,不过毕竟是第一次做工程啊,一点小错是可以原谅的。
做工程的操作如下:
Step1.开始-----程序----Microsoft visual  Basic6.0 中文版   启动   VB开发软件
Step2.文件-----新建工程-----"标准的exe”----确定
Step3.绘制界面(略)
Step4.双击“开始计算”按钮,放置如下代码:
Option  Explicit
                   Private Sub Command1_Click()

Dim M As Integer

Dim N As Integer

M = Int(Val(Text1.Text))

N = Int(Val(Text2.Text))

Dim TemparyValue As Integer

If M < N Then

TemparyValue = M

M = N

N = TemparyValue

End If

Dim Remainder As Integer

Remainder = M Mod N

While Remainder <> 0

M = N

N = Remainder

Remainder = M Mod N

Wend

Label4.Caption = Str(N)

End Sub

0
0

猜你在找
【直播】机器学习&数据挖掘7周实训--韦玮
【套餐】系统集成项目管理工程师顺利通关--徐朋
【直播】3小时掌握Docker最佳实战-徐西宁
【套餐】机器学习系列套餐(算法+实战)--唐宇迪
【直播】计算机视觉原理及实战--屈教授
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之矩阵--黄博士
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之凸优化--马博士
【套餐】Javascript 设计模式实战--曾亮
查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:6212次
    • 积分:229
    • 等级:
    • 排名:千里之外
    • 原创:21篇
    • 转载:0篇
    • 译文:0篇
    • 评论:0条
    文章存档