VB能做些什么

VB可以做数据库前台开发，也可做后台，还可以做很多应用软件。

一般开发游戏很少用到VB。游戏编程指利用计算机编程语言，如C编程语言、C++、java等，编写计算机、手机或游戏机上的游戏。

目前流行的游戏编程语言为C++编程语言，游戏编程接口为DirectX90、OpenGL和SDL(Simple DirectMedia Layer)等。

现在手机上玩的游戏分为Android与IOS两种平台，分别是用java和object-c(或swift)。当然时下也流行一些跨平台的编程引擎，例如cocos2d-x、unity 3D等。

Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序  。

在 Visual BasicNET程序设计中，整个应用程序就是一个对象，应用程序中又包含着窗（Form），命令按钮（Command），菜单（Menu）等对象。

扩展资料：

VB的编程一般用的是VB60。

VB60全称为VisualBasic 60，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。如果你是一个对编程一无所知，而又迫切希望掌握一种快捷实用的编程语言的初学者，那选择VB 60没错的。

即使考虑到VB程序本身编译和运行效率较低的不足（嘻嘻速度现在不是问题吧），单是它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，它仍不失一款优秀的编程工具，是初学者的首选。

用VB开发应用程序，包括两部分工作：一是设计图形用户界面；二是编写程序代码。设计图形用户界面通过窗体设计器来完成；而代码编辑器的作用就是用来编写应用程序代码。

参考资料：

百度百科-Visual Basic

百度百科-游戏编程

VB小定时关机很好写的，不用什么api就可以啊！但是不知道这是不是你要的，如果不满意百度HI联系我啊！我再给你修改！

'代码开始,复制下面运行即可！

_____________________________________________________________________

Private Sub Command1_Click()

End

End Sub

Private Sub Command2_Click()

Dim a As Date

Dim b As Date

Dim c As String

If Text1Text <> "" Then

a = Text1Text

c = Len(a)

b = IsDate(a)

Exit Sub

End If

If Option1Value = True Then

Shell "shutdown -s -t & a"

Exit Sub

End If

If Option2Value = True Then

Shell "shutdown -r  -t & a "

Exit Sub

End If

End Sub

Private Sub Form_Load()

MsgBox "请输入自定义关机时间然后确定！时间格式为hh:mm:ss", 64, "提示"

Form1Caption = "自定义关机程序"

Label1Caption = "关机"

Label2Caption = "重启"

Command1Caption = "退出"

Label3Caption = "请输入自定义时间"

Text1Text = ""

Text1ToolTipText = "请以12:00:00这样的时间格式输入"

Command2Caption = "确定"

Command2Default = True

Command1Cancel = True

End Sub

Private Sub Option1_Click()

Option1Value = True

End Sub

Private Sub Option2_Click()

Option2Value = True

End Sub

'万花筒程序

'粘贴下面代码即可, 不用添加任何控件

Private WithEvents Timer1 As Timer

Dim r&, r1&, t&, a1!, a2!, xb!, yb!, s!, b#

Private Sub Form_Load()

      MeWidth = 4500: MeHeight = 4500

      MeMove (ScreenWidth - MeWidth) \ 2, (ScreenHeight - MeHeight) \ 2

      MeAutoRedraw = True

      MeCaption = "CBM666的万花筒"

      Set Timer1 = ControlsAdd("vbtimer", "Timer1")

      Timer1Interval = 10

End Sub

Private Sub Timer1_Timer()

      Randomize

      r = 340  Rnd

      If r <> 0 Then

         r1 = 500

         s = r  Rnd

         b = RGB(256  Rnd, 256  Rnd, 256  Rnd)

         For t = 1 To 10000

            a1 = t  31415926 / 180

            a2 = (r1 / r)  a1

            xb = 500 + (-(r1 - r)  Cos(a1) - s  Cos(a2 - a1) + 420)  4

            yb = 500 + ((r1 - r)  Sin(a1) - s  Sin(a2 - a1) + 380)  4

            MePSet (xb, yb), b

         Next t

      End If

End Sub

先画三个command按钮如图：

第一题：

Private Sub Command1_Click()

'定义变量

Dim m, p, i

pp = 1

'输入M的值

m = Val(InputBox("请输入M值：", "输入"))

'计算

For i = 1 To m

pp = pp  i

Next i

'输出

Print "1)m=" & m & "的阶乘为：" & pp

End Sub

第二题：

Private Sub Command2_Click()

Dim k, sum, pp, kk

k = 1

pp = 1

sum = 1

kk = 1

Do While (kk > 000000001)

For i = 1 To k

pp = pp  i

Next i

kk = 1 / pp

sum = sum + kk

k = k + 1

Loop

Print "2)e的近似值为:" & sum

End Sub

第三题：

Private Sub Command3_Click()

For i = 100 To 200

If (i Mod 3 = 2 And i Mod 5 = 3 And i Mod 7 = 2) Then

Print "3)满足条件的数为：" & i

End If

Next i

End Sub

以上就是关于VB能做些什么全部的内容，包括:VB能做些什么、vb编程时用的程序、介绍一个VB小的有趣的程序代码等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！