当前位置:首页 » 操作系统 » 下拉框源码

下拉框源码

发布时间: 2022-09-12 16:45:34

A. 请高手用VB编写一个下拉框 源代码

在窗体上添加一个combo1控件,一个文本框text1(0-4)数组控件,一个说明性文字数组控件Label1(0-4),属性默认,将以下代码复制到代码窗口即可:

DimApppathAsString,StrlineAsString,aAsLong,bAsLong,x()AsString,y()AsString

PrivateSubCombo1_Click()

DimcAsString,dAsLong

c=Trim(Combo1.Text)

Ifc<>"&Ccedil;&euml;&Ntilde;&iexcl;&Ocirc;&ntilde;"Then

Ford=0Toa

Ifc=x(d,0)Then

Forf=0To4

Text1(f)=x(d,f+1)

Next

EndIf

Next

EndIf

EndSub

PrivateSubForm_Load()

IfRight(App.Path,1)=""ThenApppath=App.PathElseApppath=App.Path&""

Combo1.Text="&Ccedil;&euml;&Ntilde;&iexcl;&Ocirc;&ntilde;"

a=0

OpenApppath&"data.txt"ForInputAs#2

DoUntilEOF(2)

LineInput#2,Strline

Strline=Trim(Strline)

IfStrline<>""Then

IfLeft(Strline,InStr(1,Strline,",")-1)<>"&ETH;&Otilde;&Atilde;&ucirc;"Then

a=a+1

Combo1.AddItemLeft(Strline,InStr(1,Strline,",")-1)

EndIf

EndIf

Loop

Me.Caption="×&Uuml;&sup1;&sup2;&Oacute;&ETH;"&a&"&cedil;&ouml;&Ntilde;§&Eacute;ú"

ReDimx(a,5)

Close#2

a=0

OpenApppath&"data.txt"ForInputAs#2

DoUntilEOF(2)

LineInput#2,Strline

Strline=Trim(Strline)

IfStrline<>""Then

IfLeft(Strline,InStr(1,Strline,",")-1)<>"&ETH;&Otilde;&Atilde;&ucirc;"Then

y()=Split(Strline,",")

a=a+1

Forb=0To5

x(a,b)=y(b)

Next

EndIf

EndIf

Loop

Close#2

EndSub

B. 能有超链接的下拉框的HTML源代码是什么

下拉框选择在本窗口进行跳转:

<select onChange="location.replace(this.value)">
<option value="http://www..com" selected>网络
<option value="http://www.sina.com">新浪
</select>

下拉框选择在新窗口打开页面:

<select onChange="window.open(this.value)">
<option value="http://www..com" selected>网络
<option value="http://www.sina.com">新浪
</select>

C. flash制作下拉菜单源码

左右移动会脱离下拉菜单,而上下移动不会脱离下拉菜单,根据你代码中的on (rollOver) 和on (rollOut)的帧号可以看出是这样的问题。

D. 求CSS下拉菜单源码

用CSS 快速定制下拉菜单

访问过 Microsoft 中文主页的很多人都不会忘记它新奇的下拉式菜单吧. 它的确给我们带来一股清新的网风, 它实现了网页上下拉菜单, 不仅剩去了很多点击的麻烦, 并开创了一个网页设计的
未来之路.

我们知道, 通过 CSS 可以确切地定义一个 HTML 元素的样式,包括它的颜色、字体、边框、3D效果、滤镜等等,我们在考虑制作下拉菜单时,首先是想到 CSS 的定位技术,它精确的定位能力可以使我们放心的甚至是在三维空间设置位置和可见性。

CSS 定位使用"position"属性的两种方法定位 HTML 元素,这就是相对定位(relative)和绝对定位(absolute),相关的定位属性有9个:

position、left、top、width、height、clip、overflow、z-index、visibility

当使用"absolute(绝对)"定位元素时,该元素就被当作一个矩形覆盖物来格式化,格式化后的矩形区域就变成了一个可以放置其他 HTML 元素的容器,这个容器可以凌驾于 HTML 文档的布局之上,区域下面的文字和图形永远也无法环绕和透过该容器显示出来。这样被绝对定位了的元素我们称之为块级元素,在块级元素内放置的 HTML元素我们称之为子元素。

另外,当我们在移动鼠标时,具有对 HTML 元素有感应的 JAVA 动作是 onmouseup、onMouseOver、onMouseOut.

onmouseup 为鼠标点击之后的释放动作
onMouseOver 为鼠标经过时的动作
onMouseOut 为鼠标离开某区域时的动作.

除此之外,我们建立菜单都是为了表达一定的快捷的操作,通常是超级连接(URL).菜单上的每一条命令都应该对鼠标的行踪、点击有感应。所以,必须建立菜单对鼠标行为的多级捕获。首先是容器本身(块级元素)对鼠标经过时和离开时建立捕获,其次是菜单上各条命令对鼠标行为的捕获。也就是鼠标经过时,菜单打开响应,鼠标离去是菜单关闭。

因为菜单都是在网页调入时动态建立的,为了减轻浏览器的运行负担,加快速度,所以各个菜单只初始化一次,以后的打开和关闭操作仅仅是容器本身(块级元素)的可视与隐藏而已。

菜单的动态建立用 document.write 语句完成。 ---- 也因为是使用 CSS,因此每个菜单的第一句开头应该如此:

document.write ('< STYLE type="text/css" >...后跟菜单定位语法,根据浏览器的不同一般而言,Netscape 用相对定位, IE 用绝对定位要好一些。

然后是建立容器(块级元素) 对鼠标 onMouseOver 、 onMouseOut 的捕获。可以这样写: document.write('< span id=菜单标识 onMouseOver="发生的打开动作" onMouseOut="菜单的关闭动作" >...

其次,以如下方式层层建立菜单及捕获行为。需要注意的是菜单项定义是和鼠标感应操作定义在一块的。

< a href="超级连接" onMouseOver="菜单响应事件" onMouseOver="菜单关闭事件"> 第一条命令< /a >< br >

< a href="超级连接" onMouseOver="菜单响应事件" onMouseOver="菜单关闭事件" > 第二条命令< /a >< br >

< a href="超级连接" onMouseOver="菜单响应事件" onMouseOver="菜单关闭事件" > 第三条命令< /a >< br >

...

如果要把菜单加上边框的话,只须在菜单(块级元素)属性里加上 border: < 粗细 > < 长度 > < 颜色 > < 三维效果 > 即可。例如:

...{padding: 2pt} #TestMenu1{border:thin soild outset; position:absolute;... 就成为一个立体的细边菜单。

以下是原代码 6KB,载入浏览器时,鼠标在“下拉菜单演示”、“编译器”和“许可说明” 停靠时,便会出现下拉式菜单。

E. 下面这个下拉框是怎么做的请给一个例子(源码),本人初学,请详细一点哈,谢谢

组件中的组合框

F. 求高手帮忙修改下拉菜单源码

有点复杂,看不懂。,。,

G. 下拉框的HTML源代码是什么

<select name="请选择搜索引擎">

<option value="www..com" selected>网络</option>
<option value="www.google.com">GOOGLE</option>

</select>

<select>...</select>是下拉框的主体,中间可以有多个<option>,带有selected属性的<option>会作为默认选项。

热点内容
韩服lol挂机脚本 发布:2025-05-15 12:42:56 浏览:459
监控存储服务器如何调试 发布:2025-05-15 12:36:30 浏览:216
一万级净化车间有哪些配置 发布:2025-05-15 12:16:41 浏览:97
javazip解压加密 发布:2025-05-15 12:15:02 浏览:941
dnf服务器存放什么信息 发布:2025-05-15 12:11:07 浏览:216
办公室视频剧本脚本 发布:2025-05-15 12:03:51 浏览:490
编译失败什么意思 发布:2025-05-15 11:58:18 浏览:87
lcs脚本官网 发布:2025-05-15 11:56:15 浏览:88
三国志战略版打9级矿什么配置 发布:2025-05-15 11:41:29 浏览:953
安卓加速器怎么关 发布:2025-05-15 11:38:16 浏览:465