public class Msg : BaseMsg
{
public Msg(string senderName, string message)
: base(senderName, message)
{
}
public Msg(int id1, string senderName, string message, DateTime sendtime1, bool ifread1)
: base(id1, senderName, message, sendtime1)
{
ifread = ifread1;//´ËÌõÏûÏ¢ÊÇ·ñÒѾ¶Á¹ý
}
}
ת»»³ÉVb´úÂëÔõôд£¿
VB6²»Ö§³ÖÀà¼Ì³Ð
·¹ý
VB.NET code:
Public Class Msg
Inherits BaseMsg
Public Sub New(ByVal senderName As String, ByVal message As String)
MyBase.New(senderName, message)
End Sub
Public Sub New(ByVal id1 As Integer, ByVal senderName As String, ByVal message As String, ByVal sendtime1 As DateTime, ByVal ifread1 As Boolean)
MyBase.New(id1, senderName, message, sendtime1)
'´ËÌõÏûÏ¢ÊÇ·ñÒѾ¶Á¹ý
ifread = ifread1
End Sub
End Class
VB.net ¿ÉÒÔÕâÑù×ö,VBµÄ»°¹À¼Æ²»ÐÐ...
ѧϰÁË
ѧϰÁË
ÒýÓà VB6²»Ö§³ÖÀà¼Ì³Ð
Ïà¹ØÎÊ´ð£º
ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£ ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ, È»ºó¾ÍÖ±½ÓÓúÃÁË. ²»¹ý,Èç ......
ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾͨ¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ? ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË ......
vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ? °´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌø×ªµ½´íÎóÐÐ ²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ. ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......
TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> " ´ó¼ÒºÃ£¬ÎÒÓÃÉÏÃæÒ»¸ö¶«Î÷¸³Öµ TF1.text = & ......
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£ żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣ Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......