| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 6333 人关注过本帖
标题:如何使获得焦点的文本框显示自定输入的字符?
只看楼主 加入收藏
tiyaoli
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2007-1-26
收藏
 问题点数:0 回复次数:11 
如何使获得焦点的文本框显示自定输入的字符?
因工作的需要自己用开发了一个移动设备(PDA)上的小程序,具体界面如下:
怎么样才能使这些数字按钮的数输入到上面的几个文本框中获得焦点的文本框中!请求高手帮个忙?

下面的的数字按钮相当一个软键盘,点击下面的数字使其输入到上面任意一个有焦点的文本框中!

图片附件: 游客没有浏览图片的权限,请 登录注册
搜索更多相关主题的帖子: 文本框 移动设备 字符 焦点 PDA 
2007-11-29 09:21
bygg
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:乖乖的心中
等 级:版主
威 望:241
帖 子:13555
专家分:3076
注 册:2006-10-23
收藏
得分:0 
点击事件写个赋值不行吗??
可能是我没明白你的要求

飘过~~
2007-11-29 09:30
fairy4
Rank: 4
等 级:贵宾
威 望:10
帖 子:738
专家分:267
注 册:2007-11-1
收藏
得分:0 
判斷焦點位置,點擊數字把數賦予該焦點的文本!

一个人只有一个心脏,却有两个心房。一个住着快乐;一个住着悲伤。不要笑得太大声,不然会吵醒旁边的悲伤
2007-11-29 10:29
tiyaoli
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2007-1-26
收藏
得分:0 
原帖由 [bold][underline]fairy4[/underline][/bold] 于 2007-11-29 10:29 发表 [url=http://bbs.][/url]
判斷焦點位置,點擊數字把數賦予該焦點的文本!

我就是不知道怎么样判断识别这些有焦点的文本框
2007-11-29 10:48
tiyaoli
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2007-1-26
收藏
得分:0 
原帖由 [bold][underline]bygg[/underline][/bold] 于 2007-11-29 09:30 发表 [url=http://bbs.][/url]
点击事件写个赋值不行吗??
可能是我没明白你的要求

是用点击事件来赋值的,但是如何让这个事件来判断有焦点的文本框?
2007-11-29 10:53
wfscyl
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-10-3
收藏
得分:0 
轮寻控件
2007-11-29 16:15
fairy4
Rank: 4
等 级:贵宾
威 望:10
帖 子:738
专家分:267
注 册:2007-11-1
收藏
得分:0 
定義一個 全局變量intNum,用來儲存控件的tabindex
然后你你要輸入的文本控件的click事件里面加入如下語句
 intNum = Me.ActiveControl.TabIndex
比如 :

    Private Sub TextBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Click
        intNum = Me.ActiveControl.TabIndex
    End Sub
每個文本控件的 click事件都必須有此語句
然后在button按鈕的click事件里面書寫控制代碼

比如:
Select Case intNum
            Case 0
                Me.TextBox1.Text = "焦點在此位置 "
                Me.TextBox1.SelectionStart = Me.TextBox1.TextLength
                Me.TextBox1.SelectionLength = 0
                Me.TextBox1.Focus()
            Case 1
                Me.TextBox2.Text = "焦點在此位置 "
                Me.TextBox2.SelectionStart = Me.TextBox2.TextLength
                Me.TextBox2.SelectionLength = 0
                Me.TextBox2.Focus()
            Case 2
                Me.TextBox3.Text = "焦點在此位置 "
                Me.TextBox3.SelectionStart = Me.TextBox3.TextLength
                Me.TextBox3.SelectionLength = 0
                Me.TextBox3.Focus()
            Case 3
                Me.TextBox4.Text = "焦點在此位置 "
                Me.TextBox4.SelectionStart = Me.TextBox4.TextLength
                Me.TextBox4.SelectionLength = 0'使光標位置在文本最后
                Me.TextBox4.Focus()'因為點擊按鈕會使焦點轉移,必須把焦點重新賦予當然文本框!
        End Select

一个人只有一个心脏,却有两个心房。一个住着快乐;一个住着悲伤。不要笑得太大声,不然会吵醒旁边的悲伤
2007-11-30 09:11
abenyu
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2007-12-26
收藏
得分:0 
有没有联系方式QQ就可以啊 我很有可能需要您的帮助啊 谢谢 我的QQ是415205525
2007-12-26 11:01
fairy4
Rank: 4
等 级:贵宾
威 望:10
帖 子:738
专家分:267
注 册:2007-11-1
收藏
得分:0 
如果是對焦點操作,參看我的計數器,其他問題,+我qq:271036987
注明是干什么的,謝絕閑聊!一般晚上9點到11點在線!

一个人只有一个心脏,却有两个心房。一个住着快乐;一个住着悲伤。不要笑得太大声,不然会吵醒旁边的悲伤
2007-12-26 12:12
tiyaoli
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2007-1-26
收藏
得分:0 
根据fairy4的思路我的问题已经解决!再次感谢fairy4的指导!
只是 Me.TextBox1.Text = "焦點在此位置 "   应改为:Me.TextBox1.SelectedText = "焦點在此位置 "
2007-12-29 08:57
快速回复:如何使获得焦点的文本框显示自定输入的字符?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.030428 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved