联想y470清灰教程视频:跪求各位大侠介绍一个very简单的vb程序

来源:百度文库 编辑:神马品牌网 时间:2024/05/04 20:06:42
因为是考试用,所以越简单越好,麻烦将过程一步一步打下来,偶是菜鸟级的,拜托拜托~~~~~~~~~~

嘿嘿,在窗体上划线,够简单了吧
Option Explicit

Private Type point
X As Long
Y As Long
End Type
Dim oldP As point

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then oldP.X = X: oldP.Y = Y

End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Line (oldP.X, oldP.Y)-(X, Y), RGB(255, 0, 0)
End Sub

最简单的是画一个标签显示几个字吧,呵呵

简单归简单,但是要看有多简单,VB最简单的就是一个输入框,算加减法,这样也能通过考试?我看危险啊