用VB6.0能实现这种标签页打开子程序吗,可以是dll或都其他的,怎么做?
vb中如何实现点击标签打开新窗口
首先建一个新窗体,也就是你要调用的那个,再里面建立好数据库控件设置相关属性。
至于选择数据设计到一个全局变量进行数据传递。
然后在label的click事件里填写上"窗体名.show"就可以了。
VB6究竟能不能做被其他程序直接调用的标准的DLL动态库
VB6先创建一个ActiveX DLL 工程 TestDll 在里面加上下面的代码 Function Test(str As String) As Boolean Test = True MsgBox str End Function 编译成activex dll即可 这个dll不是基于C++的标准动态链接库,但却是应用开发效率很高的
如何用VB实现主程序生成子程序?
一个程序打开另外一个程序=可以
主程序显示子程序=可以(XXX.show)
主程序生成子程序=?
难道你要做一个VB开发工具?
否则生成(编译)这种功能很难实现!
如果你能弄到"VB6.0程序"的源代码希望分享下
- -|||
PS.如果你只是想让主程序"释放"另一个程序的话可以使用:外接程序-外接程序管理器中的"VB6 资源管理器",吧一个exe文件添加进资源管理器中,然后用Binary As #1输出
如何用vb6.0编写一个程序能实现查看某个文件格式的打开方式
我刚才编了一下这个程序但失败了,我知道在哪里查:[Hkey_Classes_Root\.rmvb](假设你要打开.rmvb的文件),找到“默认”这个键值(我刚才在vb里弄了很久都打不开),是一个字符串(如:“QQPlayer.rmvb”),然后找到[Hkey_Classes_Root\QQPlayer.rmvb\Shell\Open\Command]里面的默认键值就是默认打开程序了。
ShellExecute这个函数是这样用的:
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
其中各个参数的意义如下:
参数 |类型 |说明
hWnd |Long |指定一个窗口的句柄(可以输Me.hWnd)
lpOperation |String|指定字符串“Open”打开或“Print”打印
lpFile |String|想用关联程序打印或打开的程序名或文件名
lpParameters|String|如lpFile是可执行程序,这里输入附加参数
lpDirectory |String|使用的完整路径
nShowCmd |Long |定义了如何显示启动程序的常数值
举例:打开一个网址(Text1.Text)
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1
private sub command1_Click()
if text1.text="" then
msgbox "请输入网址",48,"Information"
else
shellexecute me.hwnd,vbnullstring,text1.text,vbnullstring,"C:\",SW_SHOWNORMAL
end if
end sub