Call FuncStrLang(CombBox.ItenData)
15、如果有下列代码:
Select Case CombBox.text
Case “London”
Call ClsCity.CityIntr_London
Case “Rome”
Call ClsCity.CityIntr_Rome
……
End Select
只要:
CallByName ClsCity, “CityIntr_” & CombBox.text, vbMethod
16、复制数组到另一变量中:
Dim iOrgArr(30) as Integer
Dim iDesArr as Variant
……
iDesArr = iOrgArr
即主变体直接取数组指针,则所有元素都复制了过去 。
17、如果有下列代码:
Do While Not RsAdo.Eof
If len(DesStr)<>0 then
DesStr=DesStr & VbTab
End if
DesStr=RsAdo!Rec_id
RsAdo.MoveNext
loop
猜你喜欢
- 免费学编程的网站 javascript学习教程
- 翡翠专业知识 翡翠专业基础知识
- 翡翠知识讲解 翡翠基础知识讲解
- 电力电缆基础知识 快来学习
- 编程开发人员说的样例 程序员说的demo是什么意思
- 会计初级需要掌握的基础知识 有什么要掌握的技巧
- 消防安全基础知识 下面是消防安全基础知识
- excel基础知识笔记 excel程序在哪个文件
- 公共基础知识怎么学效果好 公共基础如何复习
- 电子电路基础知识大全 电路设计软件有哪些
