文字列の長さの取得方法

タグの編集
投稿者 ito  () 投稿日時 2007/10/5 22:17:00
はじめまして。最近使い始めたのですが 
以下のようにパス名を任意で取得した後に 
text1.textで出力されるパス名の長さを取得したいのですが 
どうすればいいのかいまいちわかりません。 
どのようにすればいいのでしょうか? 
 
Private Sub Dir1_Change()  
  File1.Path = Dir1.Path 
End Sub 
 
Private Sub Drive1_Change() 
  On Error GoTo errhandler 
  Dir1.Path = Drive1.Drive 
errhandler:   
     If Err.Number = 68 Then 
     MsgBox "フロッピーディスクをセットして下さいい"     
End If 
End Sub 
 
Private Sub File1_Click() 
 fname0 = Dir1.Path & "\" & File1.FileName 
 Text1.Text = fname0 
End Sub
投稿者 neptune  () 投稿日時 2007/10/5 23:00:00
こんにちは 
 
>最近使い始めたのですが  
このサイトは、VB6とVB2005を扱っているので何を使って 
いるのか明示しましょう。 
 
>text1.textで出力されるパス名の長さを取得したいのですが  
>どうすればいいのかいまいちわかりません。  
私にはいまいちの意味するところが解りません。 
誰が読んでも解るように書きましょう。 
 
文字数なら 
len(text1.text) 
で取得できます。 
 
バイト数ならUnicodeに変換してLenBを使用します。 
LenB(StrConv("文字列", vbFromUnicode))