VB程序问题
Option Explicit
Dim x%, y%
Private Sub Command1_Click()
x = Val(Text1)
If Text1 = "" Then
MsgBox "请输入一个十进制数!"
Text1.SetFocus
Exit Sub
End If
If Option1 = False And Option2 = False And Option3 = False Then
MsgBox "请选择进制"
Exit Sub
End If
If Option1.Value = True Then
y = 2
Elself Option2.Value = True Then
y = 8
Elself Option3.Value = True Then
y = 16
End If
Text2 = convert(x, y)
End Sub
运行过程中显示elself语句段出现问题,找不出原因
答案:问题是你的elseif拼写错误了。删除掉重拼一下就好了,注意是IF,不是1F .你的整个程序没啥问题,就是代码那块拼写错了,把里面的几个elseif改一下,改成elseif.别的不用动,程序就能运行通过了。
其他:出现什么问题了,看代码没有问题,Option2这写对象都存在? 麻烦给一下错误的提示是什么??
上一个:VB提取多个TXT文件中每一行数据,存入新文件
下一个:vb编程题每单击命令按钮一次,就选中下一个单选按钮