VB程序设计，刚开始学，还不会，急求答案，题目见补充，急急急

'代码如下：

Private Sub Command1_Click()

List1AddItem Text1Text

Text1 = ""

Command1Enabled = False

End Sub

Private Sub Command2_Click()

List1RemoveItem List1ListIndex

Command2Enabled = False

End Sub

Private Sub Command3_Click()

Text2Text = List1ListCount

End Sub

Private Sub Command4_Click()

End

End Sub

Private Sub Form_Load()

Text1 = "": Text2 = ""

Command1Caption = "添加"

Command2Caption = "删除"

Command3Caption = "统计人数"

Command4Caption = "结束"

Command1Enabled = False: Command2Enabled = False

Command1Default = True: Command4Cancel = True

End Sub

Private Sub List1_Click()

Command2Enabled = True

End Sub

Private Sub Text1_Change()

Command1Enabled = True

End Sub

控件摆放设计界面和运行界面如下：

1

x = Val(InputBox("Input X: "))

If x < 10 Then y = Abs(x)

If x <= 20 Then y = Sqr(3 x - 1)

If x > 20 Then y = 3 x + 2

DebugPrint y

2

x = Val(InputBox("Input X: "))

If x < 10 Then

y = Abs(x)

ElseIf x <= 20 Then y = Sqr(3 x - 1)

ElseIf x > 20 Then y = 3 x + 2

End If

DebugPrint y

3

x = Val(InputBox("Input X: "))

select case x

case x < 10

y = Abs(x)

case <= 20

y = Sqr(3 x - 1)

case else

y = 3 x + 2

end select

DebugPrint y

D

第一VB中的函数参数，默认情况是ByRef类型的，也就是地址引用，传入的x会被改变。

第二ByVal是值引用，也就是说m只是y的一个副本，m值的变化并不影响y的值。

计算机二级vb考试试题（附答案）

A目前使用的IP协议主要是IPv4协议,其IP地址长度为32位

B因特网是多个网络互联而成的,不同网络中的主机可以具有相同的IP地址

C域名是IP地址的文字表述形式,但不是所有的IP地址均有相应的域名

D一个IP地址可以有多个对应的域名

16通常所说的TCP/IP协议,是指由100多个协议组成的协议系列(包含下列几个协议)•

在下列协议中,发送电子邮件主要依赖___(16)___

A>

以上就是关于VB程序设计，刚开始学，还不会，急求答案，题目见补充，急急急全部的内容，包括:VB程序设计，刚开始学，还不会，急求答案，题目见补充，急急急、vb程序设计基础设计练习题2答案、vb程序设计选择题，求解释啊！谢谢等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！