Public Class Form1
dim a as string = "Me"
Private Sub Button1_Click(Byval Sender as object,byval e as system.eventargs)Handles Button1.Click
If Me.Text = "Form1" Then
Me.Text = a
End If
End Sub
End Class
公开课室版面一
设A = “我”
私人命令按钮1_按下(设sender为发送物件,设e为系统.事件)控制按钮1.按下
如果我.字 = “版面1”就
我.字 = a
完毕如果
完毕命令
完毕课室
Public Kelas Form1
Set a = "saya"
Private Sub Button1_Tekan(Set sender ialah objek,set e ialah sistem.eventargs)Handles Button1.Tekan
Kalau Saya.Kata = "Form1"
Saya.Kata = a
Tutup Kalau
Tutup Sub
Tutup Kelas
欢迎光临 JBTALKS.CC (https://www.jbtalks.cc/) | Powered by Discuz! X2.5 |