扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
你搞反了！
创新互联从2013年成立，是专业互联网技术服务公司，拥有项目网站建设、网站制作网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元灌云做网站,已为上家服务,为灌云各地企业和个人服务,联系电话:18982081108
TextBox1.Text=z1
TextBox2.Text=z2
改成
z1=CDouble(TextBox1.Text)
z2=CDouble(TextBox2.Text)
#If...Then...#Else 指令
根据条件编译选定的 Visual Basic 代码块,需要有#Const 配对，一般要先用#Const 定义条件编译器常量
'以下是例子
Module Module1
#Const i = 60
Sub Main()
#If i 30 Then
Console.WriteLine("???") '如果用#Const定义了i，该句语句才会执行，假如用的是private i as integer=60定义，该语句不会被执行
#End If
End Sub
End Module
DT.Rows.ToString未必是指结果集中的所有数据，也许只是一行中所有的，或是一列中所有的
保险起见，可以一格格枚举
dim a as boolean=true
Dim row As DataRow
For Each row In DT.Rows
Dim column As DataColumn
For Each column In DT.Columns
if row(column).contains("Agree") then a=false
Next column
Next row
if a then
Me.rblAgReject.Items(0).Enabled = False
else
Me.rblAgReject.Items(0).Enabled = True
end if
msgbox的返回值是一个枚举值
if msgbox （“”）=1 then
end if
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网