注册 登录
编程论坛 VB6论坛

语法哪里不对啊求高手指点下

yilinlangzi 发布于 2013-06-30 22:47, 594 次点击
Private Sub Form_Load()
const players()  As String  = {"Dan", "Fred", "Bart", "Carlos", _
  "Ty", "Juan", "Jay", "Sam", "Pedro"}
Const i As Integer = CInt(Textbox1.Text)
MsgBox (players(i) & " is on first base.")

End Sub

运行时说没有AS或等号=
怎么会事?
7 回复
#2
snrtjat2013-07-01 13:46
代码是.net的吧!
你的版本是不是VB 6.0的
#3
Artless2013-07-01 20:59
Const i As Integer = CInt(Textbox1.Text)
#4
风吹过b2013-07-01 22:22
const players()  As String  = {"Dan", "Fred", "Bart", "Carlos", _
  "Ty", "Juan", "Jay", "Sam", "Pedro"}

const 是定义常量的。
VB 不能与 C 一样的,在变量定义时初始化,必须新写过一行进行初始化。
还有,VB 不能对一个已经存在的数组进行赋值(BYTE数组例外,返回值是数组的例外),只能对数组里的元素一个一个的单独进行赋值。

Const i As Integer = CInt(Textbox1.Text)
const 同样
初始化,同样。
const 定义的常量里只能出现 常量进行运算,不能出现 函数、变量、属性。
#5
yilinlangzi2013-07-02 13:34
回复 2楼 snrtjat
我的版本是V6.0的,
这段代码是教程给的。
我没运行下得去
#6
yilinlangzi2013-07-02 13:39
回复 4楼 风吹过b
const 不能定义函数?那怎么办
VB有没有定义函数的
#7
yilinlangzi2013-07-02 13:51
Private Sub Command1_Click()
Dim players() As String = {"Dan", "Fred", "Bart", "Carlos", _
  "Ty", "Juan", "Jay", "Sam", "Pedro"}
Dim i As Integer = CInt(Textbox1.Text)
MsgBox (players(i) & " is on first base.")
End Sub
运行时语法错误
查找帮助提示: MSDN集合不存在。请重新安装 MSDN,也不知道这是啥东西,和这有关系吗?
#8
风吹过b2013-07-02 14:38
Const i As Integer = CInt(Textbox1.Text)

分成二行写就是了。
dim i as integer
i=cint(textbox1.text)
1