如何让图片或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(会单独装高版本的播放器就更好了)
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
有两个问题
第一个问题：
网页源码
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">无安全问 ......
