求解：翻译一段vb代码
翻译成c#，我对vb实在是不懂!
VB code:
Public rsTemp As ADODB.Recordset
VB code:
If Objdata.ExecSelect(rsTemp, lcSQL, "") Then Exit Sub
If rsTemp.RecordCount > 0 Then
If Not IsNull(pArray) Then ReDim pArray(rsTemp.RecordCount - 1) As String
If Not IsNull(pArray1) Then ReDim pArray1(rsTemp.RecordCount - 1) As String
If Not IsNull(pArray2) Then ReDim pArray2(rsTemp.RecordCount - 1) As String
If Not IsNull(pArray3) Then ReDim pArray3(rsTemp.RecordCount - 1) As String
KK = 0
rsTemp.MoveFirst
Do While Not (rsTemp.EOF)
If Not IsNull(PCbo) Then PCbo.AddItem (Trim(rsTemp.Fields(1).Value))
If Not IsNull(pArray) Then pArray(KK) = Trim(rsTemp.Fields(0).Value)
If Not IsNull(pArray1) Then pArray1(KK) = Trim(rsTemp.Fields(1).Value)
If Not IsNull(pArray2) Then pArray2(KK) = Trim(rsTemp.Fields(2).Value)
If Not IsNull(pArray3) Then pArray3(KK) = Trim(rsTemp.Fields(3).Value)
KK = KK + 1
rsTemp.MoveNext
Loop
' Else
' pbSetCbo = False
End If
ExecSelect方法：
VB code:
Public Fu
相关问答：
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
用vc编写的dll在debug模式和release模式下启动vb的exe程序调用vc的dll可以得到正确结果，但是如果直接双击vb的exe程序调用dll报错，在dll内部添加messagebox后发现只要在函数内部声明std::string类型的变量就会出现� ......
