‘壹’ c#中如何在窗体中输出
1、C#只是编程语言。
2、学编程语言一般都是在控制台应用程序中,所以推测你可能都是在控制台输出的。建的都是控制台应用程序。
3、只要在vstdio开发环境中建windows窗体应用程序即可,然后再窗体上托一个label或textbox,在属性Text中输入值,即可输出。也可以在Load事件中将Text赋值。
‘贰’ vb窗体 输出数据的方法有哪些
像命令提示符那样直接在窗体的左上方逐行输出文字内容:
Print "文字内容"
Print 变量名
以消息框的形式输出:
MsgBox "文字内容"
MsgBox 变量名
输出到可以显示文字的控件上,如
输入文本框:
Text1.Text = "文字内容"
Text1.Text = 变量名
文字标签:
Label1.Caption = "文字内容"
Label1.Caption = 变量名
‘叁’ vb6.0 用print方法在窗体上输出数据,为什么是一列,而不是一行
就这么设定的
想要输出一行,就自己把字符串合并成一个长字符串,用一个print输出
‘肆’ VB中,窗体Load事件是什么情形为什么在Load事件中使用print.方法输出一些数据,运行时
这个事件主要用于初始化一些变量或对界面进行初始化,一般不能在这个事件中用print方法输出数据,你想想,窗体还没有load成功,怎么输出啊?
如果实在要在这里输出,可以在输出之前加一个me.show
‘伍’ vb6怎么在窗体中输出数据
输出值:
text1.text=str(v)
指定格式,用:
text1.text=format(v,"###0.000")
设置变量:类型转换函数.
v=csng(text1.text)
v=cdbl(text1.text)
v=clng(text1.text)
根据变量的类型选择。
‘陆’ 关于VB编程实现:在文本框中每输入一个字符时,立即在窗体上输出当前文本框中的内容。实验步骤及指导如下
Private Sub Text1_Change() ’这个表示是Text1_Change()事件,本行表示事件过程的开始
Print Text1 '这个表示在窗体上显示Text1 的文本内容
End Sub '本行表示事件过程的结束
--------------------------------------------------------------------
Private Sub Text1_LostFocus() ’这个表示是Text1_LostFocus()事件,本行表示事件过程的开始
Print "***"; Text1; "***" '这个表示在窗体上显示Text1 的文本内容,内容左右各加3个“*”
End Sub '本行表示事件过程的结束
--------------------------------------------------------------------
Private Sub Command1_Click() ’这个表示是Command1的单击事件,本行表示事件过程的开始
Cls '清除窗体上的显示内容
Text1.Text = "" '清除文本框Text1里的内容
Text1.SetFocus '使得文本框Text1获得焦点,即光标处于该控件里
End Sub '本行表示事件过程的结束
--------------------------------------------------------------------
Private Sub Command2_Click() ’这个表示是Command2的单击事件,本行表示事件过程的开始
End '结束本程序的运行
End Sub '本行表示事件过程的结束
事件是面向对象程序设计语言的一个重要而基本的概念,是Windows编程的最基本的途径与方法。可以这么说,编写事件过程代码是编写最简单最基本的基于 Windows的应用程序的基本。
在VB6里,提供的控件,具有各种各样的事件;
‘柒’ Print "10+6";10+6输出的结果是 ____
结果是10+6=16。Print方法可用于窗体、图片框、立即窗口、打印机等对象。用来显示文本字符和表达式的值。
表达式:Object.Print,Obiect是对象的名称,对象可以是窗体(Form)、立即窗口(Debug)、图片框(PictureBox)、打印机(Printer)等。
Print关键字可以用”?”里代替,表达式表是有若干表达式组成,各表达式之间可以用分隔符号逗号(,)、分号(:)或TAb、SPc函数等,这些可以混用。
(7)什么方法用于在窗体输出数据扩展阅读:
VB输出数据和输入数据:
1、VB提供了多种输出数据的方法,以下是主要几种:
A用对象Print方法输出数据 B用标签Label控件输出文本 C用文本框TextBox控件输出文件 D用MsgBox函数输出数据。
2、Print 方法用于在窗体、立即窗体、图片框、打印机等对象上显示文本字符串或表达式的值。Print方法的格式为:
[对象名.]Print [表达式表][,|;](表达式可能有问题)
Print为该语句的关键字,必须写。
[对象名]为可选项,若选择该项,则指定输出的对象,可以为窗体、图片框等对象;若省略该选项,则数据输出在当前窗体对象上。
[表达式表]为可选项,“表达式表”是由写在同一行上的若干表达式组成的,表达式之间用逗号或分号分隔;若不选,语句的执行结果为输出一空行。
[,|;]为可选项,表示数据的输出格式。其中逗号“,”表示以分区格式输出数据,即按打印区输出数据,每隔14列为一个打印区。分号“;”表示以紧凑格式输出数据。两者可以混合使用。
‘捌’ VB中用于接收输入数据的控件有哪些,输出数据的方法有哪些并简述其特点。 VB中,过程分为事件过程和通用
连接SQL数据库Option Explicit
Private Function Selectsql(SQL As String) As ADODB.Recordset '返回ADODB.Recordset对象
Dim ConnStr As String
Dim Conn As ADODB.Connection
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set Conn = New ADODB.Connection
'On Error GoTo MyErr:
ConnStr = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=登录数据库用户名(默认为sa);Password=登录数据库密码;Initial Catalog=数据库名;Data Source=服务器名(默认为:MERRYCHINA)" '这是连接SQL数据库的语句
Conn.Open ConnStr
rs.CursorLocation = adUseClient
rs.Open Trim$(SQL), Conn, adOpenDynamic, adLockOptimistic
Set Selectsql = rs
'Exit Function
'MyErr:
'Set rs = Nothing
'Set Conn = Nothing '释放相关的系统资源
'MsgBox Err.Description, vbInformation, "系统提示" '显示出错信息
End Function
Private Sub Form_Load()
Dim SQL As String
Dim rs As ADODB.Recordset
Dim X As Long
On Error GoTo Err_box
SQL = " select * from 用户表"
Set rs = Selectsql(SQL)
If rs.RecordCount > 0 Then
rs.MoveFirst
For X = 1 To rs.RecordCount
Combo1.AddItem rs.Fields("用户名").Value
rs.MoveNext
Next X
Combo1.ListIndex = 0
End If
rs.Close
Exit Sub
Err_box:
End Sub
Private Sub Command1_Click()
Dim SQL As String
Dim rs As ADODB.Recordset
If Text1.Text = "" Then
MsgBox "请输入口令!", 16
Text1.SetFocus
Exit Sub
End If
If Combo1.Text = "" Then
MsgBox "请选择登录用户!", 16
Combo1.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM 用户表 WHERE 用户名='" & Combo1.Text & "' AND 密码='" & Text1.Text & "' "
Set rs = Selectsql(SQL)
If rs.RecordCount > 0 Then
Form1.Show '想要打开的主窗体
MsgBox "恭喜兄弟,登录成功!", 64, "提示"
Unload Me
Else
MsgBox "口令不对,请重新输入!", 16, "提示"
Text1.SetFocus
End If
End Sub
'**********************************************************************
'说明:1) 在工程中引用Microsoft ActiveX Data Objects 2.8 Library ,其它版本也行如:2.0
' 2) 在窗体中加Texe1.text(文本框控件),Combo1.text(组合框控件),Command1(命令按钮)各一个
' 3) 在SQL Server2000中创建数据库,新建表"用户表",表中包含"ID,姓名,密码"等字段,然后将以上代码复制,OK搞定
4) 以上方式无需加载ADO控件,方便!连接ACCERS致有以下几步:
读取文件 -- 格式化数据 -- 关闭文件 -- 使用数据
如果数据量较大,需要进行筛选,且存放数据的源文件可能不定时变更,那么我们可以用一个临时文件来存放有用的数据,这样可大大提高程序的效率.要 [格式化数据]时,我们首先要进行筛选,然后还得进行分类,这样文件中的字符串才能被转换成有用的信息来供程序使用.这样一来,不用说,处理速度将大大减慢,而且就算你设计的数据格式比较科学,当数据量非常大时,文件的容量也会变的让普通计算机无法承受.
相对文本文件来说数据库的使用也大致分为以下几步:
打开数据库 -- 查找数据 -- 使用数据 -- 关闭数据库
从中可以看出,里面少了一步格式化数据,因为数据库本身在存储数据时,它就是按照一定的格式来进行存储的.
其次是,数据库与文本文件返回数据的方法不同.如果把文本文件比作一个Textbox 的话,那么数据库更像是一个ListBox.使用文本文件时我们需要从整个Textbox中取出有用的信息,并进行处理,而Listbox则可以根据需要返回特定的某一项.
由于VB本身并不带有可以访问数据库的类,所以我们需要引用一个包含能访问数据库的类来使用数据库.这里我们采用ADODB,相比DAO和能访问数据库的API来说,它比DAO更灵活,更强大;而比起API,它更简单易用,更适合初学者.而Access数据库比起SQL,也相对简单了很多,且能够满足中小型应用程序的需要,所以我们在使用数据库时,选择了Access.
就像使用文本文件来存储数据一样,我们需要先设计好数据结构,只不过在设计Access数据库的结构时,我们需要用到其它的程序来进行详细的规划.建议采用的程序是office中的Access或VB自带的VISDATA.
当数据库设计好了以后,我们可以开始"数据库编程"了.
首先,我们需要引用ADO.具体的方法是,在"工程" -- "引用" 中,找到"Microsoft ActiveX Data Object *.* Library",这里的"*.*"是指的时ADO的版本号,一般来说,应用程序或ActiveX控件都具有向下兼容性,所以我们尽可能选择比较新的版本.以确保程序在能识别旧版本Access的同时,也能识别较新版本的Access.
然后我们需要在程序中创建一个对象.就好比我们在窗体上添加一个FileBox才能看到文件名一样,只有创建了ADO对象,我们才能够访问数据库.常用的对象有两个,Connection和Recordset.
创建这两个对象的具体方法是:
1.在引用后,使用New关键字,如
Private Conn As New ADODB.Connection
Private Reco As New ADODB.Recordset
2.在没引用时,用CreateObject创建对象:
Dim Conn,Reco
Set Conn = CreateObject("ADODB.Connection")
Set Reco = CreateObject("ADODB.Recordset")
创建了对象之后,下一步我们要做的就是打开数据库了.
先看下面的代码,可以成功的打开数据库.
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Main.mdb"
这句代码打开了D盘中的Main.mdb这个数据库.
Connection.Open方法的第一个参数是连接代码,它将传递给系统的数据库引擎.前半部分"Provider= Microsoft.Jet.OLEDB.4.0",它表示了数据库的类型.不同的数据库可能会不同.后半句"Source=d:\main.mdb"它表示了数据库所在的绝对路径.
打开数据库之后,还要打开表.假如数据库中有一个表,表名为"Users",字段有两个,一个为用户名,一个为密码.那么看以下代码.
1.想返回"Users"中,[用户名]为"去年烟花"的[密码]
Recordset.open "Select 密码 From Users Where 用户名='去年烟花'",Connection,1,1
之后我们就可以把用户输入的密码进行比较,看是否允许登录.
If Recordset.eof and Recordset.bof then
Msgbox "用户不存在!",16
Else
If PassWord =Recordset("密码").value then
msgbox "登录成功!",64
Else
msgbox "密码错误!",32
End If
End If
Recordset.Close
2.假设Admin已经成功登录系统,我们想把所有的用户名和密码都显示出来
Recordset.open "Select * From Users",Connection,1,1
这时,表已经被打开,我们就用以下代码把它显示出来.
Do whlie Not Recordset.eof
Print "用户名: " & Recordset("用户名").value & "密码: " & Recordset("密码").value
Recordset.MoveNext
Loop
Recordset.Close
由以上代码示例可以看出,打开表时,可以只打开其中的一个字段,也可以打开所有.第一个参数是SQL语句.
Select [字段名] From 表名 [Where 条件]
这里的条件可以省略.且字段名也可以用"*"来代替所有字段.
需要注意的是,如果你用(1)中的方法打开,那么(2)后面显示的代码就不能再用在(1)中.因为(1)里并没有打开[用户名]字段,所以这一句Recordset("密码")就没有值存在,还有可能出错.
后面的条件,可以用"="、">"、"<"等运算符.比如 "Where ID > 32".(这里假设[ID]为数字型.)
这是打开的部分.第二个很重要的部分就是查询记录.
数据库它并不是把所有记录全部放到一个变量中备用的.而是以"当前记录"的形式来返回一个值.所以我们想从中找到有用的信息,就必须要对信息进行定位/筛选.
定位:
移动到下一条 Recordset.MoveNext
移动到上一条 Recordset.MovePrevious
移动到最后一条 Recordset.MoveLast
移动到第一条 Recordset.MoveFrist
移动到某一条 Recordset.Move Number
筛选:
Recordset.Find "条件"
如:[用方法(2)打开表之后]
Private Sub Command1_Click()
Recordset.Find "用户名=" & "text1.text"
If Recordset.Eof <> True Then
Msgbox "该用户的密码是:" & Recordset("密码").value,64
Else
Msgbox "未找到该用户的资料!",16
End If
End Sub
MoveNext 只有当Eof不为True时,才可用,否则发生错误.而MovePrevious刚是Bof不为True时....
而只要Eof 和 Bof中有一个不为真时,也就是说只要有一条记录时,它就可以使用.
Find 方法中的条件和Open时的第一个参数中的条件表述方法是完全一致的.当在已打开的记录集中,找不到该记录时,Eof为True.找到则当前的值就是符合条件的记录.
第三个部分就是添加/修改记录.
修改记录很简单,先按以上的方法找到相关记录之后,给记录赋值就可以了.
比如:[(修改密码)按方法(1)打开表之后]
Recordset("密码").value = "123456"
Recordset.Updata
需要注意的就是,在修改完成后,要调用Updata方法,这样修改才能生效.
而添加记录则可以用以下代码来实现:
Recordset.addnew
Recordset("用户名").value = "Admin"
Recordset("密码").value = "Admin"
Recordset.Updata
这里,先要调用Addnew方法,增加一条新记录,然后对这个新记录中的各字段赋值,最后再调用Updata方法.
到这里就差不多了,最后说一下上面提到的几个方法.
Recordset.Open SQL语句,数据源,游标类型,打开方法
SQL语句不用说了,就是Select那啥的,目的就是按要求从表中返回数据
数据源就是一个打开之后的Connection对象.
去他妈的游标类型,填1就可以了 [偷笑ing]
打开方法对应了几个常数,具体哪几个可以从对象浏览器里看.
对应数值的意义:
1 只读 2 独占 3 可写 4 自已可写,别人可读
Connection.open 连接代码,服务器用户名,密码
这里的连接代码就不在多说了,服务器用户名,密码只有在连接远程数据库时才用到.
‘玖’ java中怎么把数据库中数据查询出来在窗体中显示
给你个思路,可以先将数据存放在一个集合里面。因为集合是不必定义长度的。然后在根据集合长度来定义OBJ数组。给你贴段代码。希望对你有帮助。
public static Object[][] slectAll(String SQL){
Object[][] obj2 = null;
ArrayList arr = new ArrayList();
Connection conn = DBAccess.getConn();
String sql = SQL;
try {
PreparedStatement ps = conn.prepareStatement(sql);
ResultSet rs = ps.executeQuery();
while(rs.next()){
GoodsSell rl = new GoodsSell();
rl.setSellGoods_Id(rs.getString(1));
rl.setSellGoods_Name(rs.getString(2));
rl.setSellGoods_Price(Double.parseDouble(rs.getString(3)));
rl.setSellGoods_Time(rs.getString(4));
rl.setCustomer_Name(rs.getString(5));
rl.setSellGoods_SalesMan(rs.getString(6));
rl.setSell_PaymentWay(rs.getString(7));
rl.setSell_Remark(rs.getString(8));
arr.add(rl);
}
if(rs!=null){
rs.close();
}
if(ps!=null){
ps.close();
}
obj2 = new Object[arr.size()][8];
for(int i = 0;i<arr.size();i++){
obj2[i][0] = ((GoodsSell)arr.get(i)).getSellGoods_Id();
obj2[i][1] = ((GoodsSell)arr.get(i)).getSellGoods_Name();
obj2[i][2] = ((GoodsSell)arr.get(i)).getSellGoods_Price();
obj2[i][3] = ((GoodsSell)arr.get(i)).getSellGoods_Time();
obj2[i][4] = ((GoodsSell)arr.get(i)).getCustomer_Name();
obj2[i][5] = ((GoodsSell)arr.get(i)).getSellGoods_SalesMan();
obj2[i][6] = ((GoodsSell)arr.get(i)).getSell_PaymentWay();
obj2[i][7] = ((GoodsSell)arr.get(i)).getSell_Remark();
}
} catch (SQLException e) {
// TODO Auto-generated catch block
e.printStackTrace();
}finally{
DBAccess.closeConn();
}
return obj2;
} 但是现在jf.getContentPane().add(table); table报错画红线!Exception in thread "main" java.lang.Error: Unresolved compilation problem:
table cannot be resolved 一般先将table放在jscrollpane里面 然后将jscrollpane放在jpanel 里面 最后将jpanel放在jframe。
‘拾’ vb关于将数据在窗体上直接输出的问题
你是要输出百钱买百鸡吧,代码如下:
PrivateSubForm_Click()
DimwAsInteger'钱数
DimzAsInteger'鸡的数目
DimgAsInteger,mAsInteger,xAsInteger'分别代表公鸡母鸡小鸡
Print"母鸡";Tab;"公鸡";Tab;"小鸡"
Forg=1To100
Form=1To100
Forx=1To100
w=g*3+m*2+x/3
z=g+m+x
Ifw=100Andz=100Then
Printm;Tab;g;Tab;x
EndIf
Nextx
Nextm
Nextg
Print"完成!"
EndSub