VB for ArcGIS中的多个if语句

Question

我有一个有两列的形状文件（Thirri_2a和Thirri 2b）都填充了positiv和negativ double值。不，我想在名为＆＃34; Thirri＆＃34;的新专栏中进行总结。因此，我使用if语句来检查真值（不等于0）。

Dim x As Double
If (([Thirri_2a] = 0) And ([Thirri_2b] = 0)) Then
 x = 0
ElseIf (([Thirri_2a] = 0) And ([Thirri_2b] <> 0)) Then
 x = [Thirri_2b] 
ElseIf (([Thirri_2a] <> 0) And ([Thirri_2b] = 0)) Then
 x = [Thirri_2a] 
Else (([Thirri_2a] <> 0) And ([Thirri_2b] <> 0)) 
 x = (( [Thirri_2a] + [Thirri_2b] )/2)
End If

ArcGIS为我提供了精彩的错误消息： ＆＃34;错误999999＆＃34;

Answer 1

除了@ Ekkehard.Horner注释的类型说明符之外，该代码应该没有问题，但整个块应该放在Pre-logic Script Code块中。

在以下字段中，应标记Thirri =，只需添加x。