关于vb模块函数的调用，请高手解答
请看看以下导出文本文件的模块函数，我应该怎么在按钮点击事件中实现调用。
Option Explicit
Public Function TabintoTxt(objConn As Object, TableName As String, Optional TextFileName As String)
Dim rs As New ADODB.Recordset
Set rs = New ADODB.Recordset
Dim i As Long
Dim WritStr As String
Dim Fid As Long
Dim lngCount As Long ' 计数。
If TextFileName = "" Then TextFileName = App.Path & "\" & TableName & ".txt"
If objConn.State = 0 Then objConn.Open
rs.Open "select * from " + TableName, objConn
Fid = FreeFile
rs.MoveFirst
Open TextFileName For Output As #Fid
WritStr = ""
For i = 0 To rs.Fields.Count - 1
WritStr = WritStr & "" & rs.Fields(i).Name & ","
Next
Prin
相关问答：
pow(x+sqrt(x*x+1),1.0/3) (x+sqrt(x*x+1))^1.0/3
上面这两个中哪个是对的啊还是都可以 还有其中的1.0是必须用1.0? 可不可以用1啊
sqr是函数，sqrt和pow想必是自定义函数，不� ......
大家帮忙看下，在VB中有个变量str=0.00016如何计算让它变成是1.6*10的4次方
还有个问题是关于数据库查询的
在ACCESS中如何查询时，判断字段1是否为空如果是则查询字段2
在SQL中应该是select case 字段1 isn ......
要采集的页面：http://city.qzone.qq.com/html/user/searchpro.htm#mod=0&act=city&cd=120000&pg=1
我想把搜索出来的QQ都采集出来，该怎么做。看了下代码好像不是普通的那种，网址里把1改成2没用 ......
大家看看
http://topic.csdn.net/u/20091005/16/aa0a010f-1428-4eef-9886-684039e382f7.html?93089
http://topic.csdn.net/u/20091005/16/aa0a010f-1428-4eef-9886-684039e382f7.html?93089
蛋定
http://t ......
Private Sub fun()
Static a As Integer
A=a+1
Print a;
End Sub
Private Sub Command1_Click()
Dim m As Integer
&n ......
