VB半年总结

 VB经典代码:

 赋值相容问题 private   sub  command1_Click()

                        dim   x   as   Integer:dim   y  as   string

                        y="100.23"   :  x=y   :   y=y+20

                       text1.text=x  :  text2.text=y

此段代码 展示了赋值和传值的功能

 清除代码:private  sub   command1_click()

                  text1.setfocus   :  text1.text="  "   :   label1.caption =  "  " 

VB半年总结

此段代码展示了一个小鸟在不断的飞翔,这里利用了  timer控件来控制飞行的速度,只要稍稍改动代码的一部分就可以使小鸟的飞翔 改变方向。

VB半年总结

此代码的效果是可以更改窗体的颜色,可以在他的下拉菜单中选择,也可以在弹出菜单中显示菜单的颜色。 

VB半年总结c

此代码显示两个文本框中显示相同的内容
这几个例子是我觉得有代表性的例子,但是其他的例子中还有好多我没有发现的例子,其他大佬可以相互补充哈

 经过这半年,从小白到可以编写简单代码,觉得自己成长了很多,回头看看自己走过的印记,每一个都很有意义!