如何学习VB程序设计

VB比较好入门，也是一种快速应用开发的语言，但要把VB学精学透彻并不那么短时间能够实现。

你可以先学习一下VB的体系结构，大致看看就行，可能其中会有些概念不可理解，不要紧，不用去深究，时间长了接触多了你会理解的。这样做的目的主要是了解VB适合做什么，他的编程特点和运行机制是什么等概括性的东西你要有个了解。

然后你可以开始从语法学起了，VB语法并不难，但对于每个语法要点一定要自己亲自练习一下，达到熟练掌握的程度。先不要急着实现太大的功能，你这个时候也不可能实现。

接下来你可以熟悉一下VB企业版提供的那么多控件的应用了，VB提供的控件很多，你最好逐个参考MSDN做有一些小程序试一下，不必记住所有控件的接口，但你要知道以后用到的时候怎么查资料。

数据库开发是VB中很重要的一块，你不能错过，建议刚开始的可以使用ADO控件编写一些小程序，但如果熟悉了之后最好使用ADO对象编程，因为这样更灵活。这一点我强烈建议你使用ADO对象编程。

等上面这些你都学得差不多了，其间可能也会学到API编程的时候，你的VB水平已经到中等水平了，接下来干什么呢？好好实践一下吧，有机会的话最好能参与到项目实践中去，如果没有这样的机会就自己给自己定些任务来开发些简单的应用，练习多了自然会见成效的。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBaseLoad

Dim oleDbConnection1 As OleDbOleDbConnection

Dim oledbDataAdapter As OleDbOleDbDataAdapter

Dim oledbData As DataSet = New DataSet

Dim strConnect As String = "Provider= OraOLEDBOracle;Data Source=888;User ID=888;Password=888;"

oleDbConnection1 = New SystemDataOleDbOleDbConnection(strConnect)

Dim strSql As String

strSql = "select " & " from xx"

Dim oledbCommand As OleDbOleDbCommand

oledbCommandCommandText = strSql

oledbCommandCommandType = CommandTypeText

oledbCommandConnection = oleDbConnection1

oledbDataAdapterSelectCommand = oledbCommand

oleDbConnection1Open()

oledbDataAdapterFill(oledbData, "gy_bingrenxx")

oleDbConnection1Close()

'在窗体上添加一个DataGridView控件,在这个位置加一句代码

DataGridView1DataSource = oledbDataAdapterTables("gy_bingrenxx")

End Sub

程序包含一个标签和一个间隔1秒的时间控件

Private xx(1 To 5) As String

Private i As Integer, f As Integer

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 112 Then

f = MsgBox("你按了F1,继续吗？", vbYesNo + vbInformation, "提示")

If f = vbYes Then

Timer1Enabled = True

Else

Call Form_KeyDown(113, 0)

End If

ElseIf KeyCode = 113 Then

MsgBox "你按了F2键，结束应用程序！"

End

End If

End Sub

Private Sub Form_Load()

xx(1) = "aaaaaaaaaa"

xx(2) = "bbbbbbbbbb"

xx(3) = "cccccccccc"

xx(4) = "dddddddddd"

xx(5) = "请按F1、F2"

i = 1

End Sub

Private Sub Timer1_Timer()

Label1Caption = xx(i)

If xx(i) = "请按F1、F2" Then

Timer1Enabled = False

Call Form_KeyDown(112, 0)

End If

i = i + 1

If i > 5 Then i = 1

End Sub

你也可以手动按F1、F2 效果一样！

1、首先在桌面上，鼠标左键双击程序，在打开的VB6主界面上。

2、其次点击左边工具菜单栏，单击标签按钮，在Form1窗口上，绘制出一Label1。

3、最后在其属性窗口上改个名字，点击运行即可。

这个只要做一个窗体中包含三个文本框，用于输入出身的年月日，然后计算当前年龄，就要判断，如果现在的月份大约出生的月份，或现在的月份等于出生月份并且现在的日大于出生日，年龄就等于今年的年份减去出生年份，否则就等于这个值再减去一。

以上就是关于如何学习VB程序设计全部的内容，包括:如何学习VB程序设计、VB.net做一个小程序 求教、请教用VB编写一个自动按键小程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！