我想编写一个vb程序设计的代码

只要是简单一点就可以了，代码不要太长 了，我   刚开始学习的。。当然要稍微有些创意。。。

答案：
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Type POINTAPI
        x As Long
        y As Long
End Type

Private Sub Timer1_Timer()
Dim z As POINTAPI
GetCursorPos z
Label1.Caption = "x:" & Str(z.x) & "    " & "y:" & Str(z.y)
End Sub
这个够小了吧，显示，鼠标位置的
在练习吗..
那就模仿一下电脑自带的小软件吧
比如记事本..带有保存打开 复制等.
可以练练文件操作 剪贴板控制 和控件一些属性的控制
或是计算器..不用复杂的计算机~能直接进行加减乘除计算.
这个可以练练控件数组的使用.
如果已经会数据库的话，可以做一个家庭收支记录表.
我教你编一个计算器吧。

上一个：我看完VB后应该继续学什么呢？
下一个：想学习.net。但整体的学习步骤很迷茫，先学vb.net ？c#.net?asp.net ,c++ .net ,ado.net 等。该如何一步一步学？