vb是什么 怎么用它来编写小程序啊、

vb是什么 怎么用它来编写小程序啊、,第1张

VisualBasic是微软公司推出的可视化编程工具MSDN之一,是目前世界上使用最广泛的程序开发工具。

VB的语法的和QBASIB语言是基本相同的,也就是说它的语法是最容易被初学者所接受的。另外VB提供的是可视化的开发环境,我们可以象搭积木一样构建出程序的界面,而且VB提供了丰富的控件组,省去了我们自己写代码实现这些效果的麻烦,这样我们就能把更多的精力放在程序功能的实现上,所以VB学起来简单,用起来方便。

按功能键盘上的F5 运行就可以! 如果有错误,VB会出现新窗口,用汉字写出如何错误。在新窗口内点击调试,在代码窗口中出错的代码为**背景。 最后保存程序,单击“文件”菜单——选择“保存工程”。需要保存两个窗体,首先是frm的应用程序窗体,然后是vbp的工程文件。

变量定义面变量名x,y换别x1y1等

Dim

x1

As

Integer

Private

Sub

Command1_Click()'+按钮

x1

=

x1

+

1

MeCaption

=

x1

End

Sub

Private

Sub

Command2_Click()'-按钮

x1=

x1

-

1

MeCaption

=

x1

End

Sub

利用workwheet的change方法 Private Sub Worksheet_Change(ByVal Target As Range) '''' 代码中充分利用Target这个参数和这个参数的VALUE、ROW、COLOUME等属性,用于判断正在被编辑的单元格的位置 '''' 一般还会用到applicationWorksheetFunction这个对象,对象包括的成员就是EXCEL中的公式 ''''因为你没有提供具体数据,我也不好提供具体代码了 end sub

form1上放置Command1,Timer1,Picture1(装入一个)

Dim MoveStep As Integer

Private Sub Command1_Click()

Timer1Enabled = False

End Sub

Private Sub Form_Load()

MoveStep = 100

End Sub

Private Sub Timer1_Timer()

If Picture1Left + Picture1Width + 30 > Form1Width Then

MoveStep = -100

End If

If Picture1Left < 0 Then

MoveStep = 100

End If

Picture1Left = Picture1Left + MoveStep

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 效果一样!

以上就是关于vb是什么 怎么用它来编写小程序啊、全部的内容,包括:vb是什么 怎么用它来编写小程序啊、、vb6.0 制作一个简单小程序、VB设计一个简单的小程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10110822.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存