共9 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：AddInput 在苹果手机上输入不了任何字符
1楼
km007 发表于：2023/12/19 16:25:00AddInput 在苹果手机上输入不了任何字符 请问这个如何解决？
2楼
有点蓝 发表于：2023/12/19 16:33:00代码？
3楼
km007 发表于：2023/12/19 16:45:00晚点发出，项目在家里的电脑
4楼
km007 发表于：2023/12/21 0:18:00Dim e As RequestEventArgs = Args(0)
Dim wb As New weui
wb.AddPageTitle("","pageheader","测试","测试")
wb.AppendHTML("<link rel='stylesheet' href='css/common.css' Type='text/css' charset='utf-8'/>", True)
wb.AddToast("","t1", "正在验证中",1) '定义提示
wb.AddForm("","form1","logon.htm").attribute= """
With wb.AddInputGroup("form1","ipg1","基本资料")
Dim yzm3 As String = Rand.NextString(4)
.AddHiddenValue("sjyzm",yzm3)
With .AddInputCell("i1",1)
.AddLabel("lmm","编号",0)
.AddInput("CompanyCode2","text",1).PlaceHolder= "请输入CNT开头的编号" '这里的输入框苹果手机输入不了
End With
With .AddInputCell("i2")
.AddLabel("lyzm","验证码",0)
With .AddInput("yzm2","text",1) '这里的输入框苹果手机输入不了
.Max = "4" '这里的限制没有生效（电脑网页和安卓手机都不生效）
End With
.AddLabel("hym",yzm3,2)
End With
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "进入", "submit")
End With
e.WriteString(wb.Build) '生成网页
[此贴子已经被作者于2023/12/21 0:19:45编辑过]
5楼
有点蓝 发表于：2023/12/21 8:47:00这样测试有没有问题
With .AddInputCell("i1",1)
.AddLabel("lmm","编号",0)
.AddInput("CompanyCode2","text",1) '这里的输入框苹果手机输入不了
End With
With .AddInputCell("i2")
.AddLabel("lyzm","验证码",0)
.AddInput("yzm2","text",1) '这里的输入框苹果手机输入不了
.AddLabel("hym",yzm3,2)
End With
6楼
km007 发表于：2023/12/21 9:23:00我先试试
[此贴子已经被作者于2023/12/21 9:23:24编辑过]
7楼
km007 发表于：2023/12/21 9:36:00刚测试又可以了……真是 奇了 怪了
8楼
km007 发表于：2023/12/21 10:43:00奇怪 现在出现 部分苹果手机 可以，部分 苹果手机 不行
9楼
有点蓝 发表于：2023/12/21 10:49:00input控件只是最基础的网页控件，不行就只能是系统的问题了，更新到新版系统试试。
共9 条记录, 每页显示 10 条, 页签:
[1]