主题：局部变量问题

查了FOXTABLE帮助,始终找不到"局部变量"提法.不知FOXTABLE有无”局部变量”说法?比如下列代码由两大模块组成,若能在”填充数据模块”之前申明是局部变量,之后告知是局部变量结束;同理, 在”计算模块”之前申明是局部变量,之后告知是局部变量结束.这样就方便多了,代码中的变量”dr”     就不用改写了,无需将第二个变量设为”dr1”了.在实际设计中会省去许多记忆变量的麻烦.这个问题应是很普遍的问题,不知大家目前是怎样解决它的?

 

‘填充数据模块

DataTables("过渡表").DataRows.Clear()
Tables("过渡表").Redraw = False
Dim dt As Table = Tables("过渡表")
Dim Count As Integer = Tables("课程表").Count
Dim dr As DataRow
…………….
Tables("过渡表").Redraw = True

 

‘’计算模块

Dim t As New DataTableBuilder("temp") '创建临时表
………….

For Each dr As DataRow In DataTables("统计").DataRows
    dr("出现次数") = DataTables("temp").Compute("Count(字符)", "字符 = '" & dr("字符") & "'")
Next

最好做到见名知意：
drFill   drCalc
这样可读性能好一点，还不怕重复。

至于变量的生命周期的：
Dim i As Integer
For i As Integer = 0 TO 10
Next
是不允许的


For i As Integer = 0 TO 10
Next
For i As Integer = 0 TO 10
Next
是允许的。

呵呵，其实变量的名称却是应该是有意义的，特别是代码很长的时候。
foxtable中的示例代码很短，所以都是dr1、dr2这样的了，后果是养成了很多用户不良的习惯，我也意识到这个问题了。

关于变量的作用范围，和vb.net完全一样的。

呵，这样的习惯，老六是罪魁。
俺以后用中文，意义似乎更大

   就是，我以前就是有中文，现在被帮助文件给染色了，因为长期复制修改代码的习惯！

      

举一反三一下： 例1: dim h as integer =0 DataTables("课时名单").DataRows.Clear() For Each 课程表的行 As DataRow In DataTables("课程表").DataRows     for Each 课程表的列 as Datacol in DataTables("课程表").Datacols         if 课程表的行(课程表的列) isnot nothing  then     .......... 例2: dim h as integer =0 DataTables("课时名单").DataRows.Clear() For Each 课程表的  行 As DataRow In DataTables("课程表").DataRows     for Each 课程表的  列 as Datacol in DataTables("课程表").Datacols         if 课程表的  行(课程表的  列) isnot nothing  then

.............

感觉怪怪的,是否需加特别标示为变量?如%课程表的行%

用中文，看起来更乱。

“课程表的行”不如拼音缩写：kbh

今天遇到一个需要将7个过程连接起来的设计，每个过程都没有问题，但合在一起不是这里有问题，就是那里有问题，改了这处忘了那处，到处都是问题。故再次建议增加“过程1”，“过程2”，。。。。“过程n”中使用的“全局变量”和“局部变量”，以便各个过程的变量互不干扰。

我采用内部函数试试。

测试成功了，解决过程变量问题最好的方法是内部函数。