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 =  "  "

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

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

此代码显示两个文本框中显示相同的内容

这几个例子是我觉得有代表性的例子，但是其他的例子中还有好多我没有发现的例子，其他大佬可以相互补充哈

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