同時(shí)選中要修改的控件,然后在屬性窗口修改即可。所選控件必須要有同一屬性。
為企業(yè)提供網(wǎng)站制作、做網(wǎng)站、網(wǎng)站優(yōu)化、全網(wǎng)營(yíng)銷(xiāo)推廣、競(jìng)價(jià)托管、品牌運(yùn)營(yíng)等營(yíng)銷(xiāo)獲客服務(wù)。創(chuàng)新互聯(lián)擁有網(wǎng)絡(luò)營(yíng)銷(xiāo)運(yùn)營(yíng)團(tuán)隊(duì),以豐富的互聯(lián)網(wǎng)營(yíng)銷(xiāo)經(jīng)驗(yàn)助力企業(yè)精準(zhǔn)獲客,真正落地解決中小企業(yè)營(yíng)銷(xiāo)獲客難題,做到“讓獲客更簡(jiǎn)單”。自創(chuàng)立至今,成功用技術(shù)實(shí)力解決了企業(yè)“網(wǎng)站建設(shè)、網(wǎng)絡(luò)品牌塑造、網(wǎng)絡(luò)營(yíng)銷(xiāo)”三大難題,同時(shí)降低了營(yíng)銷(xiāo)成本,提高了有效客戶(hù)轉(zhuǎn)化率,獲得了眾多企業(yè)客戶(hù)的高度認(rèn)可!
一種方法是:textbox1.readonly = True? ?textbox2.readonly = True......
另一種方法是:把textbox設(shè)成組,那么,textbox(i).textbox1.readonly = True。
現(xiàn)在:'readonly' is not a member of 'Control'。
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
For Each con As Control In Controls
If TypeOf con Is TextBox Then
AddHandler con.DoubleClick, AddressOf Double_CLick
End If
Next
End Sub
Private Sub Double_CLick(sender As Object, e As EventArgs)
'在這里添加雙擊需要處理的事件
End Sub
End Class