VB程序设计1、vb.net定义了哪几种数据类型?什么是变量?什么是常量?2、哪个不能作为vb.net的变量名?ABCD（2）H0000（3）87LK（4）1233、哪个是vb.net的合法变量名?（1）x1(2)1x(3)IF(4)x[y]04、下列

Question

VB程序设计
1、vb.net定义了哪几种数据类型?什么是变量?什么是常量?
2、哪个不能作为vb.net的变量名?
ABCD （2）H0000 （3）87LK （4）_123
3、哪个是vb.net的合法变量名?
（1）x1 (2) 1x (3) IF (4) x[y]0
4、下列数据哪些是变量?哪些是常量?是什么类型的常量?
（1）MyName (2)“MyName” （3）False (4) mm
(5) “11/16/04” (6)cj (7)“280” （8）X
(9) #11/16/2004# (10)12.345
5、写出下列函数的值.
（1）INT(-3.2) (2)math.sqrt(math.sqrt(256))
(3) Ucase(“hello”) （4）LEN（“hello!”）
6、编写程序
（1）求一个三位数的各位数字之和.
（2）用Inputbox接收用户输入,求绝对值,并用Msgbox输出结果

Answer 1

1. 书上有的：
2. （3）
3.（1）
4、MyName、mm、X、是变量.False 布尔型,“MyName”“11/16/04” “280”　三者为字符型
#11/16/2004#日期型.12.345　数字
5.（1）3 (2)4
(3) HELLO （4）6
6、
(1)
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(plus3(123))
End Sub
Function plus3(ByVal abc As Integer) As Long
Dim s As String
s = Str(abc)
Return Val(Mid(abc, 1, 1)) + Val(Mid(abc, 2, 1)) + Val(Mid(abc, 3, 1))
End Function
End Class
(2)
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Double
i = InputBox("请输入数值")
i = Math.Abs(i)
MsgBox(i)
End Sub
End Class
张志晨