但用ExecuteScalar就夠了,而且效率更高
成都創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:成都網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時(shí)代的卡若網(wǎng)站設(shè)計(jì)、移動媒體設(shè)計(jì)的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
Dim myDate As string
Dim conn As SqlConnection = New SqlConnection("Server=(local);DataBase=test;Uid=sa;Pwd=123")
Dim sql As String = "SELECT adjustdate FROM plupos AS WHERE barcode = xxx "
Dim cmd As New SqlCommand(sql, conn)
conn.open
myDate=cmd.ExecuteScalar().tostring
conn.Close()
char a[20];
char b[20];
a="你好";//不可以
b=a;//不可以
b=student[1].name;//不可以
數(shù)組名是不可改的,任何對數(shù)組名的賦值操作都是不可以的,真要把字符串"你好"(或者類似的字符串)賦給a(或者這樣的字符數(shù)組)對應(yīng)的內(nèi)存區(qū)域請用strcpy
Public m as string = textbox1.tex 不要放在任何過程里。加在script language=vb runat=server下邊
在這里
sub a()
可以訪問m了。
end sub
vb.netexcel給range賦值的方法如下:
Range是對象類型,對象的賦值要加一個(gè)Set,,例如您需要的語句可以這樣寫:
Set M = Range("A1:I1")
這樣賦值以后,M才Range類型,例如可以使用 M.Count 屬性,或者 M.ClearContents 方法
如果不寫Set,那么會把Range的值賦與變量(數(shù)組類型)。
VB6中不能在聲明中給變量賦值,但你可以通過Form_Load()中給變量賦初值:
dim a as long
Private Sub Form_Load()
a=100'給變量賦初值
msgbox a'顯示該值
End Sub
如果你在程序中不會改變該值,你可以聲明為常量:
const a=100
Private Sub Form_Load()
msgbox a'顯示該值
End Sub
在VB.NET中可以聲明中給變量賦初值:
dim a as integer=100