永发信息网

vb中怎样知道我点击的是哪个控件?

答案:2  悬赏:0  手机版
解决时间 2021-02-25 23:48
我在做一个扫雷的程序,用了25个picturebox,并且定义了一个数组box(4,4)来指向这组picturebox,其中随机选出3个埋雷。
当单击是我要判断我点击的picturebox 是在什么位置,就是它具体被指向的数组,不知道怎么做了。
下面是我的代码节选,打?处我想判断是不是单击的picturebox 。
Private Sub PictureBox1_MouseClick( ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
Dim no As Integer
For Each tbox In box
If ? Then
Exit For
Else
no += 1
End If
Next
求各路大神帮帮忙!!
最佳答案
sender就是
示例:
    Private Sub PictureBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        Dim no As Integer

        If sender.Tag = "是雷" Then
            MessageBox.Show("是雷")
        Else
            MessageBox.Show("不是雷")
            no += 1
        End If
    End Subsender是一个Object对象,支持.Net的所有控件(组件),虽然sender没有实际的属性值,但在代码里依然可以调用它。
如果有不懂可以追问
望采纳
全部回答
dim text() as object private sub form_load() dim i as integer dim ntop as long redim text(1 to 10) for i = 1 to 10 set text(i) = controls.add("vb.textbox", "text1" & cstr(i)) text(i).height = 300 text(i).top = ntop text(i).visible = true ntop = ntop + 30 * 15 next i end sub 添加动态控件。你可以自己试试看。 form1上什么都不加运行这个程序后会发现自动生成了10个text控件
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
办一个小型的水果干加工作坊,大概需要多少钱
益民小区南门怎么去啊,有知道地址的么
有三根绳子分别长12米,15米,18米,现在要把
软件工程师必备技能
他们都说我长的不行,你们觉得呢?
师范学院农牧试验场怎么去啊,有知道地址的么
邯郸市小北堡2016年拆迁吗
《生之喜悦》 概括课文主要内容一定要精炼!
雅赏山这个地址在什么地方,我要处理点事
这瓷碗是什么年代的?
关于校花慕容婉的小说在哪个网站可以去看
平安信用卡的年费多少钱
高唐中化石油加油员工资多少钱2015
VB子过程调用
东记行冬稻煮客家餐厅地址在什么地方,想过去
推荐资讯
盈科旅游文水服务中心在哪里啊,我有事要去这
吸力最大的磁铁叫什么
采访记录怎么写
请问,兄弟们,绝对中奖的半全场.,皇  5日02
音响怎么和电视连接
孔周村村地址在什么地方,想过去办事
由氧气能供给呼吸,空气也能供给呼吸的事实,我
高潭镇星光村计划生育协会在哪里啊,我有事要
薛佳凝的诗
孝庄秘史孝庄最喜欢谁
中华中路地址在什么地方,想过去办事
【转的成语】什么一转的成语
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?