大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
C#.NET和VB.NET是同一托管平台(framework)下的两种不同语言,当然语法会存在差异。所以C#中无法写出以上代码,只能如此:
创新互联公司专注于寿阳网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供寿阳营销型网站建设,寿阳网站制作、寿阳网页设计、寿阳网站官网定制、重庆小程序开发服务,打造寿阳网络公司原创品牌,更为您提供寿阳网站排名全网营销落地服务。
ButView.Check = false;
Option Explicit On
Option Strict On
Imports System
Module Program
Sub Main()
Dim y,m,t As Integer
begin:
' 输入数据时一行一个
y=CInt(Console.ReadLine())
m=CInt(Console.ReadLine())
t=CInt(Console.ReadLine())
If y
200 Then
Console.WriteLine("ERROR")
goto begin
End If
pr(y,m,t)
Console.Write("Press any key to continue . . . ")
Console.ReadKey(True)
End Sub
Function pr(y As Integer,m As Integer,t As Integer) As Integer
Dim ye,[Me],i As Integer
ye=CInt((m+t-2)/12+y)
[Me]=(m+t-2) Mod 12+1
End If
End Function
Function mday(y As Integer,m As Integer) As Integer
Dim day As Integer()={0,31,28,31,30,31,30,31,31,30,31,30,31}
Dim ad As I
if myreader.getstring(2) "" then
else
....
end if
取反 这样可以的 我一直就这样写
vb中的变量取反是:not+变量
not,and,or,Xor 用做boolean值时,它们就作为逻辑运算符
not,and,or,Xor 用整数值时,它们就作为位运算符
例子:dim a as integer =not 143 ' a=-144 按位取反!~~~~~