易截截图软件、单文件、免安装、纯绿色、仅160KB

如何让图片或flash当按钮 - VB / 基础类

在Excel-VBA中,用OnAction可以将Shape,Image或Flash当按钮使用。
问:在VB6中,如何让图片或flash当按钮,谢谢。
让图当按钮很容易
放一个Image控件在表单上
设置它的picture属性(点它旁边的省略号小按钮就打开选图的对话框)为某个图
然后图就出现了
双击表单上的图片,写代码, ok

Flash的要分两步:

在FLASH里的给按钮写上如下代码:

on (release) {
fscommand("ok");
}

Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
if command="ok" then msgbox "你按了我"
End Sub

ok也可以写成别的, 只要两处ok都改成别的就行
这样就解决了,希望能帮到你

在VB里原本没有Flash控件, 要选菜单"工程">"部件"
出一对话框, 向下找到"Shockwave Flash"勾选
工具程上最后多出了一个按钮, 放一个在表单上, 设置它的Movie属性, 比如设为c:\test.swf
一运行Flash就出现在你的表单上了, 如果swf的版本高于你Flash播放器的版本,会出不来, 简单的解决办法就是下载安装高版本的Flash(会单独装高版本的播放器就更好了)


相关问答:

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

vb读取xml - VB / 基础类

现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb WebBrowser 小问题,请教 - VB / 基础类

vb WebBrowser 小问题,请教:
WebBrowser里的网址跳转后,怎么取得跳转后的页面的URL地址

顶下顶下

引用
BeforeNavigate2
好像没有这个吧 vb6.0

BeforeNavigate2
这个可以有,呵呵。
......

VB如何获得别的程序上的表格内容? - VB / API

我的要求是:通过抓取别的程序上的表格的句柄,然后读取这个表格的内容。
表格句柄(类名:MSFlexGridWndClass)我已抓到,接下来如何读取表格的内容就不会了?求助。

能把代码发来学习下不?
244326867@qq.com ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号