当前位置:首页 > 代码 > 正文

点击弹出密码代码(点击弹出密码代码错误)[20240506更新]

admin 发布:2024-05-06 21:11 112


本篇文章给大家谈谈点击弹出密码代码,以及点击弹出密码代码错误对应的知识点,希望对各位有所帮助,不要忘了收藏本站喔。

本文目录一览:

求一段代码,作用是:运行form1,弹出需要输入密码的对话框(密码:1234567890)

Private Sub Form_Load()

Dim StrA

StrA = InputBox("请输入密码", "密码框")

If StrA = "1234567890" Then

Form1.Show

ElseIf StrA "1234567890" Or StrA = "" Then

MsgBox "密码输入错误", vbOKOnly + vbCritical, "系统提示"

Unload Me

End If

End Sub

当我点击“产品名称”时,需要弹出文本框输入“密码”提示,然后才能看到里面的产品,这个JS代码怎么写啊

html

head

titletest/title

script type="text/javascript"

function test(){

alert("弹出一个新窗口,新窗口中加个form,用来显示输入密码框,输入正确后,跳转到一个新的action处理,返回一个产品详细信息页面!");

}

/script

/head

body

a onclick='test();' 产品名称/a

/body

/html

EXCEL VBA怎样在点击按钮后,弹出一个输入密码的对话框,密码正确的话执后续程序段,否则结束

Sub test()

myPW = "123456"  '设置密码

p = InputBox("请输入运行密码", "温馨提示!", Default)

If myPW = p Then

    MsgBox "OK"     '删除此句,插入原代码

Else

    MsgBox "密码错误,请重新输入!", , "温馨提示!"

End If

End Sub

关于点击弹出密码代码和点击弹出密码代码错误的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。

版权说明:如非注明,本站文章均为 AH站长 原创,转载请注明出处和附带本文链接;

本文地址:http://ahzz.com.cn/post/1213.html


取消回复欢迎 发表评论:

分享到

温馨提示

下载成功了么?或者链接失效了?

联系我们反馈

立即下载