UC知道VB用户类型定义的问题
来源：百度知道 编辑：UC知道 时间：2024/06/17 09:56:24
我想定义一个QuestionType类型，这个类型里面有：填空题（Filling），判断题，单选题，多选题，还有问答题，在定义的时候我把他们定义成
Type QuestionType
Filling As String
...
End Type
这5种题全都定义成As String行不行？还是要定义成整数型的？
我后面的程序里要判断“如果QuestionType是填空题，则...”代码是
If QuestionType=1 Then
...
就是这个QuestionType=1这里让我不知道应该把这些定义成As String，还是要定义成整数型
Type QuestionType
Filling As String
...
End Type
这5种题全都定义成As String行不行？还是要定义成整数型的？
我后面的程序里要判断“如果QuestionType是填空题，则...”代码是
If QuestionType=1 Then
...
就是这个QuestionType=1这里让我不知道应该把这些定义成As String，还是要定义成整数型
如果都是整型，应该用枚举
Private Enum QuestionType
Filling
End Enum
调用
Dim a As QuestionType
Select Case a
Case QuestionType.Filling
End Select
首先我认为根本不需要定义类型，如果你一定要定义，那我建议你全部定义成整数型，因为你用这个类型只是用于判断题目的类型。
如果不定义，只要用select Case就可以满足“如果QuestionType是填空题，则...”的判断要求。
应该这样了用
if QuestionType.Filling=1 Then
......
end if