13518219792
msgbox的返回值是一个枚举值
创新互联建站是一家专业提供芦溪企业网站建设,专注与网站制作、成都网站设计、H5建站、小程序制作等业务。10年已为芦溪众多企业、政府机构等服务。创新互联专业网站建设公司优惠进行中。
if msgbox （“”）=1 then
end if
if好像不能这么用吧？其它语言都是
if (条件1 运算符 条件2) {
code
}
vb应该也差不多 好像时间没用了 都忘了。
if a 1 or b1 then
if text1.text = "10" then
|-if text3.text = "11" then
| |text5.text = "正确"
| |else
| -if text6.text = "abc" then
| |text7.text = "bcd"
| |end if（3）
| |end if（2）
end if（1）
简单的树状图，
3对应if text6.text = "abc" then
2对应if text3.text = "11" then
1对应if text1.text = "10" then
else对应的应该是第二个if。
if多了可能导致混乱，可以考虑select case
如果要求检测到text1.text不等于10就立即运行if text6.text = "abc" then应该这样写
每一个if语句end if要清晰地写出
缩进也要空好，看得清楚（VB.NET就不错）
if text1.text = "10" then
if text3.text = "11" then
text5.text = "正确"
end if
else
if text6.text = "abc" then
text7.text = "bcd"
end if
end if
2L的多了一个end if
在If外定义Startd64。
Dim Startd64 As String = String.Empty;
If GetINI(Sec, "Javad64", False, INIPath) Then
Startd64 = "-d64";
End If
MsgBox(Startd64)
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
