能不能用For...Next给多个变量赋值？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我需要给多个变量赋值，现在的代码如下

Dim rep As String = IIF(e.GetValues("rep") = "",e.PostValues("rep"),e.GetValues("rep"))

Dim cou As String = IIF(e.GetValues("cou") = "",e.PostValues("cou"),e.GetValues("cou"))

Dim sta As String = IIF(e.GetValues("sta") = "",e.PostValues("sta"),e.GetValues("sta"))

Dim cit As String = IIF(e.GetValues("cit") = "",e.PostValues("cit"),e.GetValues("cit"))

Dim key As String = IIF(e.GetValues("key") = "",e.PostValues("key"),e.GetValues("key"))

Dim quoid As String = IIF(e.GetValues("quoid") = "",e.PostValues("quoid"),e.GetValues("quoid"))

Dim soid As String = IIF(e.GetValues("soid") = "",e.PostValues("soid"),e.GetValues("soid"))

像这样的变量以后可能还会增加，所以想通过数据结合For...Next语句来给这些变量赋值，我的想法如下

Dim gks() As String = {"rep","cou","sta","cit","key","quoid","soid"}

For i As Integer = 0 To gks.Length - 1

gks(i) = IIF(e.GetValues(gks(i)) = "",e.PostValues(gks(i)),e.GetValues(gks(i)))

我知道这样值会赋给gks(0), gks(1)等数组成员。想请教我该如何才能实现把值赋给 rep， cou 等这些变量？

先行谢过！

主题：能不能用For...Next给多个变量赋值？