标题:[求助]如何学好VB
取消只看楼主
zyzlh
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-6-15
 问题点数:0 回复次数:0 
[求助]如何学好VB

学VB一个星期了,总是感觉自己不能入门,心也很急噪,看书也很多地方看不懂,自己用,又不知道从哪里下手
在网上找了不少教程之类的,效果不好,我自己用的是
Visual Studio 2005 这个软件
(我搞不清楚这个软件到底属于VB,还是VC,还是什么乱78糟的,因为我现在在的公司指定要用这个软件)
希望各位大虾,GG、JJ们教教我
我现在等于什么都不会

今天自己动手做了一个很简单的东西,就是一个 小窗口,输入任意文字,按确认会出来一些字
也是模仿别人做的(让我自己做,我还真不知道怎么下手)

代码也是抄袭别人的,可是抄过来问题多多,我仔细研究了近一天,

最后只有 一个 错误,始终没办法解决“无法查找到事件 Click

之后我保存程序,重起电脑,运行却没有发生任何错误
我的第1件小作品,算是完成了
请高手看看代码,有那些是多余或不正确的


Option Strict Off
Option Explicit On
Public Class Form1
Friend Class Form1
Inherits System.Windows.Forms.Form
' Declare a WithEvents variable.
Dim WithEvents Button1 As New EventClass

' Call the method that raises the object's events.
Sub TestEvents()
Button1.RaiseEvents()
End Sub


' Declare an event handler that handles multiple events.
Sub EClass_EventHandler() Handles Button1.XEvent, Button1.YEvent
MsgBox("Received Event.")
End Sub

Class EventClass
Public Event XEvent()
Public Event YEvent()
' RaiseEvents raises both events.
Sub RaiseEvents()
RaiseEvent XEvent()
RaiseEvent YEvent()
End Sub
End Class
Private Sub Button1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Button1.Click
Me.Text = "欢迎使用Visual Basic 6.0开发工具"
'命名窗体
Dim Txthello As New System.Windows.Forms.Form

Txthello.Show("你好,欢迎使用Visual Basic 6.0开发工具,在这里我们将简单介绍一下怎样创建一个简单的窗体应用程序。")
'设置 TextBox 的 Text 值
End Sub

Private Sub Button2_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Button2.Click
End
End Sub
End Class
End Class

搜索更多相关主题的帖子: 软件 Studio 效果 
2006-06-15 17:33



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-72557-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.107087 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved