我在a.bas中定义一个函数如下:
Public Sub test(a As String, b As String)
If a = "OK" Then
MsgBox a
Else
MsgBox b
End If
End Sub
在form1中调用这个函数:
Dim aa, bb As String
Private Sub Command1_Click()
aa = "OK"
bb = "NO"
Call test(aa, bb)
End Sub
一直提示“ByRef参数类型不符”,但是写成下面的方式,就运行正常。
call test("OK",bb)
请问如何处理?
Public Sub test(a As String, b As String)
If a = "OK" Then
MsgBox a
Else
MsgBox b
End If
End Sub
在form1中调用这个函数:
Dim aa, bb As String
Private Sub Command1_Click()
aa = "OK"
bb = "NO"
Call test(aa, bb)
End Sub
一直提示“ByRef参数类型不符”,但是写成下面的方式,就运行正常。
call test("OK",bb)
请问如何处理?
解决方案 »
- 如何列出 windows2003 中所有本地用户,以及组和对应组下面的用户
- 关于数据导出的问题
- spread控件。获得多选的值~
- 请教IC卡CPU卡问题????
- 小妹用哥们的账号在线等候:如何在vb中调用sql server2000中建立的一个DTS包(急)
- 奇怪的删除问题。。。
- 大家帮帮我!!我想卖笔记本电脑!!大家帮帮我呀??有分给呀!!!!!
- 如何把MSHFlexGrid控件单元格中的数据保存到数据中去
- vbs 获得输入焦点
- 为什么我在ISQL/W中可以修改数据库,但在VB的VisData中,却告诉我数据库是只读的?
- 把一个流折分成两段,分别保存为两个文件。100分
- 当 toolbar 一个按扭的样式为 5-tbrDropDown 时 怎么写它采单的click事件?
If a = "OK" Then
MsgBox a
Else
MsgBox b
End If
End Sub