Office中國論壇/Access中國論壇

標(biāo)題: ACCESS中實現(xiàn)VB索引調(diào)用的簡單例子 [打印本頁]
作者: andymark    時間: 2011-11-14 20:43
標(biāo)題: ACCESS中實現(xiàn)VB索引調(diào)用的簡單例子
        網(wǎng)友在http://www.mzhfr.cn/thread-107144-1-1.html  中提出能否實現(xiàn)用CALL 調(diào)用帶變量的過程名稱，這里做了個簡單的示例
  1. Private Sub Form_Load()
  2.    Call SetupClick
  3. End Sub


  6. Private Function Test(Index As Integer)

  8.    MsgBox Me.Controls("Cmd" & Index).Caption

  10. End Function


  13. Private Sub SetupClick()

  15.   Dim I As Integer
  16.   For I = 1 To 3
  17.      Me.Controls("Cmd" & I).OnClick = "=Test(" & I & ")"
  18.   Next
  19.   
  20. End Sub
復(fù)制代碼
[attach]47325[/attach]



歡迎光臨 Office中國論壇/Access中國論壇 (http://www.mzhfr.cn/) Powered by Discuz! X3.3