从c到vb.net 从c到a林清
c语言与vb.net先学那个好一些 本来想学vb.net的,但大多数人都说先学c好一些,我该选哪个
VB已经没有竞争力了。没有学习VB的必要了。C语言、C++语言、Java语言,这三个语言才是最有用的编程语言。
创新互联公司专注于网站建设,为客户提供成都网站设计、成都网站建设、网页设计开发服务,多年建网站服务经验,各类网站都可以开发,品牌网站设计,公司官网,公司展示网站,网站设计,建网站费用,建网站多少钱,价格优惠,收费合理。
不要被VB的美丽的界面迷惑了,功能强大才是硬道理。VB那是华而不实,没有用的。用C语言、C++语言做出来的程序才有实际功能。
我现在就用 VC 编写一个简易的对话框给你看看。
#pragma comment(linker,"/subsystem:\"Windows\" /entry:\"mainCRTStartup\"")
#include windows.h
int main(void)
{
if ( MessageBox ( NULL , "请您选择是或否。" , "请选择" , MB_YESNO ) == IDYES )
MessageBox ( NULL , TEXT("您单击了是。") , "提示" , MB_OK ) ;
else
MessageBox ( NULL , TEXT("您单击了否。") , "提示" , MB_OK ) ;
return 0 ;
}
请帮忙将以下C语言代码转换为VB.NET代码,谢谢!
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 y100 Then
y=y+2000
End If
If y1916 OrElse m200 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
Console.WriteLine(" {0}-{1} ~ {2}-{3}",y,m,ye,[Me])
ye=y
[Me]=m
For i=0 To t-1
prmonth(ye,[me])
[Me]=[Me]+1
If [Me]12 Then
ye=ye+1
[me]=1
End If
Next
Return 0
End Function
Function yam(y As Integer,m As Integer) As Integer
Dim st As String()={"未定义","一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月"}
Console.WriteLine(" {0} {1}",y,st(m))
Console.WriteLine("----------------------------")
Return 0
End Function
Function ryear(y As Integer) As Integer
If 0=y Mod 400 OrElse (0y Mod 100 AndAlso 0=y Mod 4) Then
Return 1
Else
Return 0
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 Integer=0
If 2=m Then
ad=ryear(y)
End If
Return day(m)+ad
End Function
Function monday(y As Integer,m As Integer) As Integer
Dim md As Integer=6
Dim i,daynum As Integer
For i=1916 To y-1
daynum=365+ryear(i)
md=(md+daynum) Mod 7
Next
For i=1 To m-1
md=(md+mday(y,i)) Mod 7
Next
Return md
End Function
Function prmonth(y As Integer,m As Integer) As Integer
Dim md As Integer=monday(y,m)
Dim daysnum As Integer=mday(y,m)
Dim days As Integer=daysnum+md
Dim i As Integer
yam(y,m)
Console.Write(" 日 一 二 三 四 五 六")
For i=0 To days-1
If 0=i Mod 7 Then
Console.WriteLine()
Console.WriteLine()
Console.Write(" ")
End If
If i-md=0 Then
Console.Write(" {0,2}",i-md+1)
Else
Console.Write(" ")
End If
Next
Console.WriteLine()
Console.WriteLine()
Return 0
End Function
End Module
c#和vb.net哪个好学一点,需要编写个程序哪个更好上手,这2个都可以把程序最后表现成网页形式吧
如果你没学过编程,c#和vb.net都一样。如果你有Qbasic基础,vb更容易。
很久很久以前有一种语言叫做Qbasic,其方便快捷,比C语言更贴近与我们的一般用语,所以容易上手。
后来有了VB,vb又比C++(C++是C语言的进化版)更容易上手。所以大家就有了一致的VB易于C语言的特点。但是到了VB.net的时候,C#是继承自VB和C以及JAVA的各种特性于一身,现在C#基本上一统天下了,少数熟悉VB的人还在用,VB.net,不过新人都不怎么学VB。net了。话又说回来,VB。net血的人少,不代表没用,只要用好了,菜刀一样杀人。
asp.net可以使用C#也可以使用vb语言。
C#和VB。net其实是一种语言,就像山东话和陕西话都是中国话一样。
学c#好还是学vb.net好?哪个更有前途?
你是dotnet的拥趸,你也许会碰到一个查遍了所有资料也得不出一个结论的答案:那就是学vb.net与c#,我也是半路出家的道士,曾经也苦苦的寻求的答案。
到头来也是一无所获反而更加的迷惘了。根据我个人的经验,特为和我当年有同种寻求答案的人提供一种参考。
一、学vb.net吧,原因:
如果你有过vb的编程经历,要那就建议你从vb.net开始吧,虽然vb.net已经与vb有着本质的变化了,它看起来才是一真正的面向对象的语言,但ms又为vb开发保持留了最大平滑过渡的可能性。
1、vb.net基于vb发展而来的语言,但绝不是简单的升级,因为本质东西已经没有共通之处了,但让你有似曾相识的感觉,上手还是比较快的。
2、vb.net与c#编译后的微软中间语言msil内容都是一致
二、学c#吧,原因:
如果你是从没有开的经验朋友,那就从c#直接开始原
1、因为商业的关系,ms先生们肯定会有所侧重,把更多的精力投入到这门新的语言中。
,哪种对你来可以取得更多的收益,你就用哪门语言。
C语言转换为VB.NET
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
请大侠帮我将C代码转换成VB.Net,谢谢!
public function Calculate_CRC8(byval crc as uint16,byval n as uint16) as uint16
dim i as uint16
crc=crc xor n
for i=0 to 7
if crc and 1 then
crc=(crc1) xor H8c
else
crc=crc1
end if
next
return crc
end function
当前名称:从c到vb.net 从c到a林清
网站链接:http://pwwzsj.com/article/hjochh.html