关于软件VB源码（高分）

msgbox "aaa" 打开对话框
on error resume next
当发生错误，代码继续执行
on error goto err
当发生错误，自动调转到err
Err.Number 错误号
Err.Description 错误描述
if *** then
msgbox "dd"
end if
如果**那么久跳出对话框，内容为dd
for i=1 to 10
将i 从1 到10循环一遍
Command1_Click
调用Command1_Click的过程
me.caption=""
窗体的标题改为空
me.width=0
窗体的宽=0
me.height=0
窗体的高=0
me.left=0
窗体的左边距离容器为0
me.top=0
窗体的高度距离容器为零
debug.print
在立即窗口输出
print
在窗体输出
printer.print
打印机打印
end
停止进程，关闭
exit sub
退出过程
mid$("abcd",1,1)
取abcd中的第一个字母开始取一个字母为止
right$("abce",2)
取abce中的右边两个字母
left$("devg",1)
取devg左边起第一个字母