急!用VB编写一个程序

急!用VB编写一个程序,第1张

创建picture 控件数组,三个command

Private Sub Command1_Click()

    Call ch(True, False, False, True, True, True, True)

End Sub

Private Sub Command2_Click()

    Call ch(True, False, False, False, True, True, True)

End Sub

Private Sub Command3_Click()

    Call ch(False, False, False, False, False, False, False)

End Sub

Private Sub Form_Load()

    Command1Caption = "E"

    Command2Caption = "F"

    Command3Caption = "还原"

End Sub

Sub ch(a0 As Boolean, a1 As Boolean, a2 As Boolean, a3 As Boolean, a4 As Boolean, a5 As Boolean, a6 As Boolean)

    Dim i As Integer

    Picture1(0)Visible = a0

    Picture1(1)Visible = a1

    Picture1(2)Visible = a2

    Picture1(3)Visible = a3

    Picture1(4)Visible = a4

    Picture1(5)Visible = a5

    Picture1(6)Visible = a6

End Sub

vb可以写的程序很多,比如我学的就是用于测绘方面的

对于初学者来说,简单的啊需要了解vb的三要素“对象”“事件”“方法”

比如单机窗体加载一张作为背景:

private sub form1_()load

form1picture=loadpicture("") ,""号内为需要加载的的路径后面在加上\名格式。就可以了

end sub

再如单机命令按钮,窗体出现文字:

private sub command_()click

print"你好" '因号内为你要窗体显示的文字

end sub

以上就是关于急!用VB编写一个程序全部的内容,包括:急!用VB编写一个程序、一般用vb编写什么程序具体举几个简单的例子、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

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

原文地址:https://www.54852.com/zz/10178741.html

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

发表评论

登录后才能评论

评论列表(0条)

    保存