VB编程基础数据类型说课材料.ppt
文本预览下载声明
*;*;*;*;*;*;*;*;*;*;*;*;*;*;*;*;Private Sub Command1_Click()
Dim a As Integer, b As Single, c%, d! ,t As Integer
a = 25 : b = 13.36
c = 69
d = 45.89
t = a
a = c
c = t
Print a=; a
Print b=; b
Print c=; c
Print d=; d
Print t=; t
End Sub;*;*;*;*;*;*;*;*;*;*;Private Sub Command1_Click()
Dim a As String, b As String, c As String, n As Integer
a = Visual Basic
n = InStr(a, “ ”) ‘查找空格的位置
b = Left(a, n - 1)
c = Mid(a, n + 1)
Print b
Print c
End Sub
;*;*;*;*;*;小结
显示全部