| vb 功能如何实现 ？
|
 减小字体
 增大字体
|
问题：我本来是编了一个小软件，里面有一个按钮，按下那一个按钮才会实现里面的功能，我现在想改为双击运行这一个程序就实现里面的功能比如说这一段代码要如何改？Private Declare Function URLDownloadToFile Lib urlmon Alias URLDownloadToFileA (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Private Sub Command1_Click() R = URLDownloadToFile(0, http://down.roben2008.cn/123.rar, c:\123.rar, 0, 0) End Sub
简单
把Command1_Click改成p1
再另外写
Private Sub Form_Load()
call p1
End Sub
就OK了.
{或把Command1_Click改成p1
双击窗体就出现
Private Sub Form_Load()
End Sub
了
中间加call p1 }
如果你对我本来是编了一个小软件，里面有一个按钮，按下那一个按钮才会实现里面的功能，我现在想改为双击运行这一个程序就实现里面的功能比如说这一段代码要如何改？Private Declare Function URLDownloadToFile Lib urlmon Alias URLDownloadToFileA (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Private Sub Command1_Click() R = URLDownloadToFile(0, http://down.roben2008.cn/123.rar, c:\123.rar, 0, 0) End Sub这个问题有好的意见或
建议，请留言
|
|
[]
[返回上一页]
[打 印]
|
|
|
您当前的位置：
百科371 → 电脑/网络 → VB → 电脑/网络内容
退出登录