　　
質問掲示板は移転しました。新掲示板はこちら。

質問 (解決済み)

[artisocモデル] アルファベットのユーザー定義関数

質問者: yuzuさん , 質問日時: 2020/01/09 14:03

char()の()内にある数字に対応したアルファベットを返すユーザー定義関数を作ろうとしているのですが。「ステートメントの最初にあるべき文字列ではありません」とエラーが出てしまいます。どのようにすればよいのかご教授をお願いします。
Function char(AL as Integer) as string
{
char(1) = "A"
char(2) = "B"
char(3) = "C"
char(4) = "D"
char(5) = "E"
char(6) = "F"
char(9) = "G"
char(10) = "H"
char(11) = "I"
char(12) = "J"
char(13) = "K"
char(14) = "L"
char(15) = "M"
char(16) = "N"
char(17) = "O"
char(18) = "P"
char(19) = "Q"
char(20) = "R"
char(21) = "S"
char(22) = "T"
char(23) = "U"
char(24) = "V"
char(25) = "W"
char(26) = "X"
char(27) = "Y"
char(28) = "Z"
return 0
}

▼解決した回答

関数が書き方がおかしいです。
Function char(ALnum as Integer) as string
{
Dim ALstr As String
If ALnum == 1 Then
　ALstr = "A"
Elseif ALnum == 2 Then
　ALstr = "B"
（以下、略）
End if
return(ALstr)
}

回答者: igaguri さん , 回答日時: 2020/01/09 14:14

▼ 全ての回答

関数が書き方がおかしいです。 Function char(ALnum as Integer) as string { Dim ALstr As String If ALnum == 1 Then 　ALstr = "A" Elseif ALnum == 2 Then 　ALstr = "B" （以下、略） End if return(ALstr) }
回答者: igaguri さん , 回答日時: 2020/01/09 14:14